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Abstract 


COMPARE  is  a  FORTRAN  computer  program  resulting 
from  a  study  to  develop  methods  for  comparative 
economic  analysis  of  alternatives  in  industrial  wood 
and  bark  energy  systems.  COMPARE  provides  complete 
guidelines  for  economic  analysis  of  wood  and  bark 
energy  systems.  As  such,  COMPARE  can  be  usefui  to 
those  who  have  only  basic  familiarity  with  investment 
analysis  of  wood  and  bark  energy  systems.  This  report 
provides  instructions  on  how  to  prepare  data  for 
COMPARE,  information  on  how  to  use  the  program, 
sample  data,  sample  output,  and  a  listing  of  the 
program. 

COMPARE  ranks  investment  alternatives  according  to 
the  highest  benefit  cost  ratio  based  on  discounted 
energy  values  and  cash  flows.  The  use  of  a  benefit  cost 
ratio  ?s  a  ranking  criterion  is  analyzed  and  explained  in 
an  appendix  to  this  report.^ — 


United  States 
Department  of 
Agriculture 

Forest  Service 

Forest 

Products 

Laboratory’ 

General 

Technical 

Report 

FPL-36 

June  1983 


COMPARE 

A  Method  for 
Analyzing  Investment 
Alternatives  in 
Industrial  Wood  and 
Bark  Energy  Systems 


PETER  J.  INCE,  Research  Forester 


Accession  For" 

Nlis'  gra&i 
MIC  TIB 
^•nnouuced 
Justmc.tloi 


By-  _ 

5i*£MbutioD/ 

^ilabUUy  Codes' 

/Avail  and/or' 

I  Speoial 


fDist 


A 


Introduction 

This  report  presents  a  method  that  was  developed  to 
analyze  investments  in  industrial  wood  and  bark  energy 
systems.  The  method  is  embedded  in  a  computer 
program  called  COMPARE  that  is  presented  in  this 
report. 

COMPARE  was  written  in  FORTRAN  language  which  is 
widely  used  among  forest  products  researchers  and 
professionals.  COMPARE  was  developed  using 
facilities  of  the  University  of  Wisconsin  UNIVAC  1110 
computer  under  the  EXEC  8  operating  system,  and  is 
compatible  with  the  Madison  Academic  Computer 
Center  version  of  the  FORTRAN  V  language. 

This  report  contains  instructions  for  others  who  woulo 
like  to  use  COMPARE.  A  user  must  have  access  to  a 
computer  system  capable  of  processing  the  COMPARE 
program  listed  In  the  appendix.  Since  all  versions  of 
FORTRAN  and  all  computer  systems  are  not  precisely 
the  same,  some  minor  modifications  may  be  required  in 
the  program  to  make  COMPARE  compatible  with  other 
systems.  A  user  should  have  some  experience  or  basic 
familiarity  with  FORTRAN  computer  programs,  with 
cash  flow  investment  analysis,  and  with  the  general 


’Maintained  at  Madison,  Wis.,  In  cooperation  with  the  University  of 
Wisconsin. 

italicized  numbers  in  parentheses  refer  lo  literature  cited  at  the  end  of 
this  report. 


design  or  concepts  of  industrial  energy  systems  that 
burn  wood  or  bark  as  fuel.  Several  references  are 
provided  for  general  information  on  cash  flow  analysis 
(f,  2,  7,  8),2  concepts  of  wood  energy  systems  (3,  5),  and 
computer  programs  for  economic  analysis  (4,  6). 

Finally,  the  user  will  create  the  required  data  which  are 
used  as  input  for  COMPARE  and  described  in  this 
report.  COMPARE  is  therefore  an  analytical  tool,  the 
results  of  which  depend  mainly  on  data  provided  by  the 
user. 

COMPARE  is  a  framework  for  economic  Investment 
analysis  of  alternatives  in  wood  and  bark  energy 
systems.  The  user  of  COMPARE  provides  a  set  of  data 
which  describes  two  or  more  investment  alternatives. 
With  accurate  data,  COMPARE  will  calculate  which 
alternative  appears  most  economical.  The  following  are 
some  examples  of  applications  where  COMPARE  may 
be  useful: 

1.  An  economic  feasibility  study  of  a  new  wood  or  bark 

energy  system  at  a  manufacturing  plant. 

2.  A  comparative  economic  analysis  of  using  wood  or 

bark  fuel  versus  "fossil"  fuel  (e.g.  coal,  oil,  or  gas) 
at  an  industrial  facility. 

3.  An  economic  feasibility  study  of  adding  new 

equipment  to  an  existing  wood  or  bark  energy 
system  (such  as  fuel  predryers  or  additional  heat 
recovery  devices). 

4.  Research  and  development  economic  analyses  of 

new  wood  and  bark  energy  systems  or  new 
equipment  design  concepts. 


Program  Function 

A  complete  listing  of  the  COMPARE  program  is 
provided  in  the  appendix.  Overall,  COMPARE  performs 
the  following  series  of  data  processing  and  analytical 
steps: 

READ  DATA  SUPPLIED 
BY  USER  AND  ASSIGN 
PROGRAMED  DATA 


FOR  EACH  ALTERNATIVE: 


CALCULATE 

DEPRECIATION 

ALLOWANCES 


.CALCULATE  HEAT 
ENERGY  RECOVERY 


CALCULATE  FUEL 
REQUIREMENTS 


CALCULATE 
INVESTMENT 
PARAMETERS  AND 
ECONOMIC  CRITERIA 


PRINT: 

FINANCIAL 
SUMMARIES 
RANKING  OF 
ALTERNATIVES 
ENERGY,  FUEL 
PARAMETERS 

First,  COMPARE  reads  the  data  input  supplied  by  the 
user,  and  assigns  programed  data  values  for  the 
analysis. 

The  program  then  calculates  depreciation  for  each 
investment  alternative  being  analyzed,  in  data  input  the 
user  can  specify  the  depreciation  schedule  that  wlli  be 
calculated  from  the  four  schedules  that  are  mandated 
under  the  Federal  Accelerated  Cost  Recovery 
System— ACRS  (1981).  The  choice  of  schedule  depends 
on  when  the  investment  is  put  in  piace.  The  first 
schedule  applies  in  1981  to  1984,  the  second  schedule 
applies  in  1985,  and  the  third  schedule  applies  In  1986 
and  thereafter.  The  fourth  schedule  is  straight  line 
depreciation  which  can  be  used  at  any  time  under 
ACRS  guidelines.  Alternatively,  the  user  can  simply 
enter  a  complete  depreciation  schedule  as  data  input 
Instead  of  having  the  schedule  caicuiated  by  the 
program. 

Next,  the  program  calculates  heat  recovery  In  Btu  per 
pound  of  wood  or  bark  fuel  for  each  alternative.  Heat 


recovery  estimates  are  calculated  on  the  basis  of  data 
Input.  The  general  algorithm  for  calculating  heat 
recovery  is  described  In  a  separate  publication  (5). 

The  program  then  calculates  the  quantity  of  wood  or 
bark,  as  well  as  alternate  or  auxiliary  fuels  (nonwood  or 
bark)  required  to  satisfy  user-specified  annual  heat 
requirements  in  each  of  the  investment  alternatives. 

Next,  the  program  calculates  net  cash  flows  and 
present  value  of  net  cash  flows  for  each  alternative. 

Net  cash  flow  is  conventionally  defined  as  revenues 
minus  operating  expenses,  taxes,  and  investments  in  a 
given  time  period.  However,  COMPARE  only  considers 
operating  expenses  (costs),  taxes,  and  investment. 
COMPARE  operates  on  the  assumption  that  there  are 
always  sufficient  revenues  and  tax  iiabllity,  such  that 
the  full  amount  of  depreciation  allowances  and 
expenses  can  be  deducted  from  tax  liability.  Thus,  in 
COMPARE  the  annual  "net  cash  flows"  are  caicuiated 
as  follows:  The  Initial  net  cash  flow  occurs  at  the 
beginning  of  the  first  year  (beginning  of  year  1,  also 
known  as  “year  0").  The  initial  net  cash  flow  is  the  old 
facility  net  salvage  value,  minus  the  total  initial 
investment  and  working  capital  requirement.  Subse¬ 
quent  cash  flows  are  end  of  year  flows.  Net  cash  flow 
at  the  end  of  the  first  year  Is  investment  tax  credit,  pius 
first  year  depreciation  allowance  times  the  tax  rate, 
minus  additional  investment  (for  working  capital),  and 
annual  costs  (Including  the  nondepreciable  expenses 
part  of  investment)  times  one  minus  the  tax  rate.  Net 
cash  flows  for  subsequent  years  are  caicuiated  as 
depreciation  allowance  times  tax  rate,  minus  additional 
investment,  and  annual  costs  times  one  minus  the  tax 
rate.  Net  cash  flow  for  the  iast  year  is  adjusted  by 
adding  back  the  accumulated  working  capital  and 
ending  salvage  vaiue. 

The  program  then  calculates  a  benefit  cost  ratio  for 
each  investment  alternative.  The  benefit  part  of  the 
ratio  is  the  discounted  present  vaiue  of  energy  outputs 
which  are  assigned  an  arbitrary  vaiue  by  the  user.  The 
"cost”  part  is  the  discounted  present  vaiue  of  net  cash 
flows,  in  COMPARE,  net  cash  flows  represent  es¬ 
sentially  the  net  cost  of  energy,  after  taking  into 
account  investment,  taxes,  and  depreciation.  Energy 
output  values  are  assigned  in  the  data  input  in  dollars 
per  million  Btu.  The  methodoiogy  and  appropriateness 
of  using  a  benefit  cost  ratio  as  a  criterion  Is  discussed 
in  the  appendix. 

Finally,  the  program  calculates  the  heat  energy  and 
fuel  requirements  balance  for  each  alternative  in  terms 
of  Btu  and  fuel  sales  units. 

Data  Requirements 

COMPARE  data  input  requirements  are  described  in 
this  section  of  the  report.  Data  input  is  partly  optional 
because  COMPARE  contains  programed  vaiues  for  part 
of  the  data.  The  programed  values  are  for  data  that  can 
be  assigned  typical  or  common  values.  For  example, 
the  higher  heating  value  of  wood  or  bark  is  assigned  a 
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value  of  8,500  Btu  per  pound.  The  user  may  always  intended  to  describe  the  average  physical  charac- 

refine  an  analysis  by  entering  more  accurate  data  to  teristics  of  fuels  in  each  of  the  alternatives.  Table  1 

replace  the  programed  values.  The  user  may  replace  describes  the  specific  data  that  are  required  for  each 

programed  values  by  simply  entering  different  values  in  alternative.  As  indicated  in  table  1,  the  COMPARE 
the  data  However,  COMPARE  does  not  contain  program  Is  provided  with  programed  values  for  most  of 

programed  values  for  some  of  the  data  (particularly  the  data.  Thus,  the  user  does  not  need  to  provide  data 

economic  data)  so  the  user  must  always  provide  some  if  programed  values  are  appropriate.  Table  1  shows  the 

of  the  data  for  program  input.  specific  values  that  are  programed  for  all  alternatives. 

As  noted  In  table  1,  the  user  must  provide  some  data 

The  first  step  in  using  COMPARE  is  to  create  the  data  for  which  there  are  no  programed  values.  A  set  of  data 

set  for  each  of  the  investment  alternatives.  From  2  to  corresponding  to  the  data  outlined  in  table  1  must  be 

10  alternatives  can  be  analyzed  per  run.  It  is  an  entered  for  each  of  the  Investment  alternatives.  Table  1 

important  and  critical  task  for  the  user  to  create  also  gives  the  program  name  (four-letter  variable  code) 

accurate  data  because  the  accuracy  of  results  is  likely  for  each  of  the  items  of  data, 

to  depend  on  the  accuracy  of  the  data. 

Data  are  required  also  on  the  physical  parameters  of 
The  first  items  of  data  required  for  COMPARE  are  the  the  heat  recovery  system  for  each  alternative.  Those 

number  of  alternatives  to  be  analyzed  and  a  name  or  parameters  are  shown  in  table  2  as  are  the  programed 

title  for  each  alternative.  Next,  data  are  required  on  the  values  that  will  be  used  for  all  alternatives  unless  the 

physical  parameters  of  wood  and  bark,  and  alternate  or  user  provides  substitute  data.  A  separate  set  of  data 

auxiliary  (nonwood  or  bark)  fuels  in  each  alternative.  corresponding  to  that  shown  in  table  2  must  be 

The  data  should  represent  average  values,  and  are  developed  for  each  investment  alternative. 


Table  1.  —  Description  of  data  input  parameters  required  by  COMPARE  for  wood  or  bark  fuel  and  auxiliary  or  alternate  fuel  for  each 
investment  alternative. 


Parameter  description 

Programed  value' 

Program 

variable 

name 

(1)  wood  or  bark  fuel  moisture  content  (as  fired, 
average  decimal  fraction  of  wet  weight) 

(') 

AFMC 

(2)  weight  of  wood  or  bark  fuel  in  ovendry  pounds 
per  sales  ur.it 

0 

AWRU 

(3)  the  name  of  the  wood  or  bark  fuel  sales  unit 
(maximum  of  8  letters) 

0 

RFS1  and 
RFS2 

(4)  the  ultimate  analysis  hydrogen  content  of  the 
wood  or  bark  fuel  (decimal  fraction  of  dry  weight) 

0.06 

AVHC 

(5)  the  ultimate  analysis  oxygen  content  of  the 
wood  or  bark  fuel  (decimal  fraction  of  dry  weight) 

0.41 

AVOC 

(6)  the  ultimate  analysis  carbon  content  of  the 
wood  or  bark  fuel  (decimal  fraction  of  dry  weight) 

0.50 

AVCC 

(7)  the  ultimate  analysis  nitrogen  content  of  the 
wood  or  bark  fuel  (decimal  fraction  of  dry  weight) 

0.01 

AVNC 

(8)  average  higher  heating  value  of  the  wood  or  bark 
fuel  (Btu  per  pound,  ovendry) 

8,500.0 

AHHV 

(9)  type  of  alternate  or  auxiliary  fuel  (coded 
choice.  0-oil,  1-coal,  2-nat.  3-other) 

(0) 

(V  (2)  (3) 

NCAF 

(10)  the  name  of  the  alternate  or  auxiliary 
fuel  (max  of  4  letters) 

OIL 

COAL  GAS  (’) 

AXFT 

(11)  the  name  of  the  sales  unit  for  the 
alternate  or  auxiliary  fuel  (4  letters) 

BBL. 

TON  MCF  (’) 

/  AFSU 

(12)  higher  heating  value  of  alternate  or  auxiliary 
fuel  (millions  of  Btu  per  sales  unit) 

6.3 

24.0  10  (') 

HHVU 

(13)  combustion  heat  recovery  efficiency  obtained 
from  alternate  or  auxiliary  fuel  (decimal 
fraction  of  higher  heating  value) 

0.8 

0.67  0.76  (') 

CHRE 

'Programed  values  are  used  in  the  analysis  unless  the  user  enters  substitute  data. 


'Indicates  parameter  must  be  supplied  by  user  (no  programed  value). 
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Table  2.  —  Description  of  data  input  parameters  required  by  COMPARE  for  the  heat  recovery  system  in  each  alternative 


Heat  recovery  system  parameters 


Parameter  description 

Programed  value' 

Program 

variable 

name 

(14)  essential  annual  heat  energy  requirements, 
or  essential  heat  energy  output  of  the 
system  in  millions  of  Btu  per  year 

<’) 

EBTU 

(15)  surplus  heat  energy  output  in  millions  of 

Btu  per  year 

<’> 

SBTU 

(16)  maximum  quantity  of  wood  or  bark  fuel 
available  for  use  per  year  (sales  units) 

(*) 

RAVL 

(17)  temperature  of  flue  or  stack  gases  just 
beyond  heat  recovery  devices  of  the 
system  when  burning  wood  or  bark  fuel  (*F) 

500.0 

ASGT 

(18)  temperature  of  the  wood  or  bark  fuel 
entering  the  furnace  (*F) 

60.0 

ATRF 

(19)  temperature  of  the  combustion  air  entering 
the  furnace  (*F)  with  wood  or  bark 

60.0 

ATCA 

(20)  excess  air  entering  the  furnace,  as  a 
decimal  fraction  of  theoretical  air  needed 
for  combustion,  when  burning  wood  or  bark 

0.40 

AEAF 

(21)  "conventional"  heat  ioss  (decimal  fraction 
of  available  heat  of  combustion  that  is 
lost  via  radiation,  convection,  conduction, 
etc.),  when  burning  wood  or  bark 

0.04 

ACHL 

(22)  the  decimal  fraction  of  Btu  output  which 
is  designed  to  be  derived  from  wood  or 
bark  fuei  when  such  fuel  is  available 
and  used  (remaining  fraction  Is  derived 
from  auxiliary  fuel) 

0.0 

AFBA 

'Programed  values  are  used  unless  the  user  enters  substitute  data. 


’indicates  parameter  must  be  supplied  by  user  (no  programed  values). 


Finally,  data  are  required  on  the  economic  parameters, 
for  which  there  are  no  programed  values,  associated 
with  each  alternative.  Table  3  outlines  the  reqHred 
economic  data,  all  of  which  must  be  entered  by  the 
user.  A  separate  set  of  data  corresponding  to  that 
shown  in  table  3  must  be  provided  for  each  investment 
alternative. 

The  data  outlined  in  tables  1  to  3  describe  fully  the 
pertinent  physical  and  economic  parameters  of  each 
alternative.  There  must  be  a  title  and  a  set  of  data 
corresponding  to  the  data  outlined  In  tables  1  to  3  for 
each  alternative. 

A  Compare  Analysis  Example 

The  following  is  an  example  of  analysis  using  the 
COMPARE  program  based  on  hypothetical  sample 
data.  Three  investment  alternatives  In  energy  systems 
for  a  hypothetical  forest  products  manufacturing 
facility  are  compared.  The  first  Is  to  continue  operating 
a  fully  depreciated  boiler  system  that  uses  natural  gas 
fuel  and  requires  no  new  Investment.  The  second, 
requiring  an  investment  of  $1,428,000,  Is  to  Install  a 
wood  fuel  and  supplementary  oil  burning  furnace  and 


boiler  to  burn  available  wood  residues.  The  third 
alternative  is  to  Install  a  larger  wood  fuel  and  coal 
burning  furnace  and  boiler  requiring  an  investment  of 
$1,828,000.  The  second  and  third  alternatives  allow 
surplus  heat  energy  output. 

Under  all  three  alternatives,  the  energy  system  will 
satisfy  the  essential  process  heat  energy  requirements 
of  the  wood  products  facility.  Heat  energy  is  required, 
for  example,  as  process  steam  and  for  space  heating. 
Essential  heat  energy  requirements  are  252,230  million 
Btu  per  year.  The  critical  question  is,  which  of  the  three 
investment  alternatives  Is  most  economical?  Sufficient 
data  have  been  obtained  to  use  the  COMPARE  program 
to  analyze  the  three  alternatives.  The  sample  data  and 
analysis  results  are  provided  here.  Again,  this  Is  purely 
an  Illustrative  example.  Results  are  not  applicable  In 
general  to  other  cases. 

Data  Input  Format 

The  sample  data  Illustrated  In  figure  1  describe  each 
of  the  three  Investment  alternatives.  Data  Input  Is 
prepared  for  COMPARE  using  specific  data  format  and 
Instructions  described  In  this  section  of  the  report  The 
data  Include  the  number  of  investment  alternatives,  the 
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Table  3.  —  Description  of  economic  data  parameters  required  by  COMPARE 


Economic  parameters 
Parameter  description 

(23)  the  capital  investment  in  new  assets  required  to  undertake  the  investment  alternative  or  project  (in  dollars  at  the 
beginning  of  the  first  year  of  the  planning  period— year  0) 

(241  the  working  capital  requirements  needed  to  undertake  the  project  (dollars  required  at  year  0) 

(25)  the  nondepreciable  expenses  required  to  undertake  the  project  (dollars  at  year  0) 

(26)  the  salvage  value,  if  any,  from  salvage  of  olo  assets  (in  dollars,  after  taxes,  at  year  0) 

(27)  the  after-tax  salvage  value  of  new  assets  at  the  end  of  the  last  year  of  the  planning  period  (in  dollars) 

(28)  the  discount  rate  used  for  discounting  future  after  tax  net  cash  flows  to  present  value  (decimal  fraction) 

(29)  the  effective  tax  rate  on  ordinary  income  (decimal  fraction) 

(30)  depreciation  schedule  for  new  assets  (coded  choice:  1— ACRS  schedule  for  1981  to  1984,  2— ACRS  schedule 
for  985,  3— ACRS  schedule  for  1986  and  thereafter,  4— straight  line  depreciation,  0  or  other— user  enters 
depreciation,  or  no  depreciation  considered) 

(31)  the  number  of  years  in  the  plarning  period  (1  to  20) 

(32)  the  number  of  years  in  the  depreciation  period  (usually  5  years  for  most  manufacturing  related  combustion 
equipment) 

(33)  the  investment  tax  credit  afforded  by  investment  in  new  assets  (dollars  at  end  of  year  1) 

(34)  the  annual  rate  of  increase  or  inflation  in  total  working  capital  requirements 

(35)  total  annual  variable  costs,  excluding  depreciation,  during  each  year  of  the  planning  period  (in  dollars 

(36)  total  annual  fixed  costs,  excluding  depreciation,  during  each  year  of  the  planning  period  (in  dollars) 

(37)  value  of  essential  heat  energy  outputs  in  dollars  per  million  Btu 

(38)  value  of  surplus  heat  energy  outputs  in  dollars  per  million  Btu 

(39)  average  value  of  auxiliary  or  alternate  fuel  during  each  year  of  the  planning  period  (in  dollars  per  fuel  sales  unit) 

(40)  average  value  of  wood  or  bark  fuel  during  each  year  of  the  planning  period  (dollars  per  fuel  sales  unit) 

(41)  (optional)  annual  depreciation  allowances  for  new  assets  during  each  year  of  the  planning  period,  in  dollars 
(required  only  if  parameter  30  is  not  specified  as  1,  2.  3,  or  4,  or  if  the  user  does  not  intend  to  have 
depreciation  calculated  on  the  basis  of  parameter  30) 


Program 

variable 

name 

IVST 

WCRQ 

IEXP 

CSAL 

FATS 

DISR 

TXRT 

NDEP 

NYRS 

NYRD 

ITCR 

INRT 

VCST 

FCST 

HVAL 

SVAL 

PAXF 

RVAL 

DEPR 


Note.  Each  of  parameters  35  to  40  may  be  specified  optionally  as  the  first-year  value  and  an  estimated  annual  rate  of  increase.  The 
computer  will  calculate  the  appropriate  values  for  all  other  years  in  the  planning  period.  All  dollar  amounts  should  be  in  terms  of  actual 
dollars  (not  indexed,  '‘real,”  or  constant  value  dollars). 


title  of  each  alternative,  and  the  41  items  listed  in 
tables  1  to  3.  In  most  data  processing  facilities  such 
data  can  be  entered  either  by  using  keypunched  data 
cards,  or  by  writing  the  data  on  a  tape  or  disk  file.  Data 
format  is  the  same  whether  the  computer  reads  a  card 
deck,  or  a  file.  (It  is  important  to  follow  the  instructions 
provided  here  because  if  the  correct  format  is  not  used 
the  program  may  not  function  properly.)  The 
instructions  are  given  on  a  card  by  card  basis, 
assuming  the  user  will  prepare  a  data  card  deck.  The 
same  format  would  apply  if  the  user  prepared  a  data 
file  on  disk  or  tape  except  that  the  data  would  be 
entered  line  by  line  on  the  data  file  instead  of  on  cards. 

Six  types  of  cards  must  be  used  to  prepare  data  in 
order  to  use  the  COMPARE  program.  The  program 
variables  and  the  format  used  on  the  six  types  of  data 
cards  are  shown  in  figure  2.  The  six  types  of  data  cards 
are  prepared  as  follows 


Card  type  1— The  first  card  in  the  data  deck  (or  first 
line  in  a  data  file)  is  always  the  type  1  card  and  only 
one  to  a  deck.  The  only  data  on  the  type  1  card  is  the 
number  of  investment  alternatives  to  be  considered  in 
the  analysis.  The  program  name  of  this  entry  is  NALT. 
The  user  may  specify  an  integer  number  from  2  to  10, 
which  will  correspond  to  the  number  of  alternatives. 

The  number  is  entered  in  the  first  two  columns  justified 
to  the  right  (using  FORMAT  (12)). 

Card  type  2.— The  titles  of  the  investment  alternatives 
are  entered  separately  on  type  2  data  cards  with  one 
card  for  each  alternative.  There  will  be  from  2  to  10 
type  2  data  cards,  depending  on  the  number  of 
alternatives  specified  (NALT).  For  example,  if  three 
alternatives  are  specified,  there  will  be  a  separate  title 
for  each  and  one  type  2  data  card  for  each  title.  Each 
title  can  be  up  to  80  columns  wide  (using  FORMAT  (20 
A4)).  Furthermore,  the  sequence  in  which  the  titles  are 
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entered  determines  the  sequence  in  which  remaining 
data  are  entered. 

Card  type  3.— Type  3  cards  contain  data  on  physical 
parameters  of  wood  and  bark  fuel  for  each  alternative. 
All  of  the  parameters  (1-13)  described  in  table  1  are 
entered  on  type  3  data  cards.  The  number  of  type  3 
cards  must  be  the  same  as  the  number  of  alternatives 
(NALT)  Type  3  cards  are  prepared  in  the  same 
sequence  of  alternatives  as  type  2  cards.  The  format 
for  data  entry  is  illustrated  in  figure  2. 

If  programed  values  are  appropriate  then  the  user  does 
not  have  to  enter  the  data.  Four  of  the  data  items,  as 
noted  in  table  1,  have  no  programed  values  (AFMC, 
AWRU,  RFS1  and  RFS2,  and  NCAF).  The  user  must 
always  enter  data  for  those  items.  However,  any  of  the 
other  items  on  type  3  data  cards  may  be  left  blank,  in 
which  case  the  programed  values  shown  in  table  1  will 
be  used. 

Card  type  4  —Data  on  the  physical  parameters  of  the 
energy  system  as  outlined  in  table  2  are  entered  next 
on  type  4  data  cards.  The  number  of  type  4  cards  is  the 
same  as  the  number  of  alternatives  (NALT),  and  are 
prepared  in  the  same  sequence  of  alternatives  as  the 
type  2  cards.  All  of  the  data  outlined  in  table  2 
(parameters  14-22)  are  entered  on  the  type  4  cards.  The 
format  for  data  entry  is  illustrated  in  figure  2.  Values 
for  the  parameters  EBTU,  SBTU,  and  RAVL  must  always 
be  entered  by  the  user.  Values  for  the  other  items  need 
not  be  entered  if  programed  values  are  appropriate 
(programed  values  are  given  in  table  2). 

Card  type  5  — Type  5  data  cards  are  used  to  enter  part 
of  the  economic  parameters  outlined  in  table  3 
(parameters  23-34).  One  type  5  data  card  is  prepared  for 
each  of  the  alternatives  (NALT),  again  using  the  same 
sequence  of  alternatives  as  the  type  2  cards.  This 
format  is  also  illustrated  in  figure  2.  Values  for  all 
economic  parameters  must  be  entered  by  the  user 
because  COMPARE  has  no  programed  values  for 
economic  data  (none  of  the  entries  on  the  type  5  data 
cards  should  be  blank,  unless  an  entry  of  zero  is 
intended). 

Card  type  6.— The  last  type  of  data  card,  type  6,  is  used 
for  entering  the  remaining  economic  data  (parameters 
35-41  from  table  3).  Type  6  data  cards  differ  from 
previous  cards  in  that  only  one  parameter  for  each 
alternative  is  entered  on  each  type  6  card.  Values  for 
the  following  parameters  are  entered  separately  on 
type  6  cards:  VCST,  FCST,  HVAL,  SVAL,  PAXF,  RVAL, 
and  optionally,  DEPR.  For  each  parameter,  a  value  is 
required  for  each  year  in  the  planning  period  for  each 
alternative  The  number  of  years  in  the  planning  period 
(or  economic  life)  of  each  alternative  is  the  number 
specified  for  NYRS  on  the  type  5  data  card. 

There  are  two  options  for  entering  data  on  type  6  cards. 
One  option  is  to  enter  data  values  for  each  year  of  the 
planning  period  for  each  alternative.  The  second  option 


Is  to  enter  only  a  first -year  value  followed  by  a  decimal 
fraction  which  represents  the  annual  rate  of  increase  or 
decrease  in  the  first-year  value.  Under  the  second 
option,  the  user  does  not  have  to  provide  estimates  for 
each  year  of  the  planning  period.  Under  that  option, 
COMPARE  will  compute  values  for  years  following  the 
first  year  by  compounding  the  specified  annual  rate  of 
increase  or  decrease  over  the  entire  planning  period. 

The  sequence  of  data  entry  for  type  6  data  cards  Is  as 
follows:  First,  the  appropriate  values  are  entered  for  the 
parameter  VCST  for  the  first  alternative  (using  the 
sequence  of  alternatives  established  by  type  2  cards). 
Only  one  card  Is  required  per  alternative  to  enter  values 
for  VCST  if  the  number  of  years  in  the  planning  period 
is  10  or  less,  or  if  a  first -year  value  plus  annual  rate  of 
increase  is  entered  Two  cards  are  required  if  values  for 
each  year  are  entered  and  the  number  of  years  exceeds 
10.  After  values  for  VCST  are  entered  for  the  first 
alternative,  values  for  VCST  are  entered  for  each  of  the 
remaining  alternatives  (again,  following  the  sequence 
of  alternatives  established  by  type  2  cards),  using  the 
same  instructions  as  for  the  first  alternative.  After 
VCST  values  have  been  entered  for  each  of  the 
alternatives,  values  for  other  parameters  (FCST,  HVAL, 
SVAL,  PAXF,  and  RVAL  in  that  sequence)  are  entered  in 
the  same  way  as  VCST.  Values  for  each  alternative  are 
entered  before  going  to  the  next  parameter.  Again 
annual  values  for  each  year  of  the  planning  period  may 
be  entered;  or  optionally,  just  the  first-year  value  (col. 
1-8)  plus  the  annual  rate  of  increase  as  a  decimal 
fraction  (col.  9-16)  may  be  entered. 

COMPARE  can  calculate  annual  depreciation 
allowances  based  on  user-specified  investment  in  new 
assets,  depreciation  period,  and  selection  of  the 
appropriate  schedule.  The  choice  of  depreciation 
schedule  is  made  by  the  user  in  selecting  the 
appropriate  code  for  the  variable  NDEP  for  each 
alternative  (1  for  1981  to  1984  ACRS  schedule,  2  for 
1985  ACRS  schedule,  3  for  1986  and  thereafter  ACRS 
schedule,  and  4  for  straight  line).  Alternatively,  the  user 
can  elect  to  enter  annual  depreciation  allowances 
instead  of  having  allowances  calculated  by  the 
computer.  That  option  Is  indicated  by  specifying  some 
code  value  other  than  1,  2,  3,  or  4  for  NDEP  (e.g.  by 
specifying  0  for  example).  If  the  user  thus  elects  to 
enter  annual  depreciation  data,  the  data  are  entered  on 
type  6  cards,  following  the  cards  for  RAVL,  using  the 
same  sequence  of  alternatives.  An  allowance  value 
must  be  entered  for  each  year  in  the  planning  period. 
One  card  is  required  if  the  planning  period  Is  10  years 
or  less,  two  cards  are  required  if  the  planning  period  is 
11  to  20  years.  No  cards  are  required  if  codes  1,  2,  3,  or 
4  are  specified  for  NDEP  for  a  given  alternative. 

Sample  Data 

As  Illustrated  with  the  sample  data  in  figure  1,  there 
is  one  type  1  data  card  (line  1),  which  specifies  the 
number  of  alternatives  ("3"  in  col.  1-2).  There  are  three 
type  2  data  cards  which  give  the  descriptive  title  of 
each  alternative  (lines  2-4),  three  type  3  data  cards  (lines 
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5-7);  three  type  4  data  cards  (lines  8-10  in  fig.  1);  and 
three  type  5  data  cards  (lines  11-13  in  fig.  1).  Finally, 
there  are  18  separate  type  6  data  cards  (lines  14-31,  in 
fig.  1). 

Sample  Program  Output 

When  a  COMPARE  analysis  is  made  with  the  sample 
data  shown  in  figure  1,  the  results  are  the  printed 
output  shown  in  figure  3.  The  output  consists  of  three 
parts.  Part  I  of  the  printed  output  (the  first  two 
pages  in  fig  3)  has  financial  summaries  for  each  of 
the  three  alternatives.  The  financial  summaries  show 
the  investment  parameters,  fuel  costs,  and  cash  flows 
associated  with  each  alternative.  Annual  net  cash 
flows  and  present  value  of  net  cash  flows  are  also 
provided. 

A  ranking  of  alternatives  according  to  benefit  cost 
ratios  is  found  in  part  II  of  the  printed  output  (one 
page).  In  the  sample  output  (fig.  3),  alternative  3  is 
ranked  highest,  with  alternative  1  ranked  lowest, 
according  to  benefit  cost  ratios.  Generally,  benefit  cost 
ratios  reveal  the  most  economical  of  any  two 
alternatives,  provided  that  two  sufficient  assumptions 
can  be  made.  The  assumptions  are  that  both 
alternatives  will  be  replaced  at  the  end  of  their 
economic  lives  by  replacement  projects  which  (1)  have 
the  same  benefit  cost  ratio  and  carry  the  planning 
periods  forward  to  an  equal  planning  period  for  both 
alternatives,  and  (2)  the  replacement  projects  will  have 
a  benefit  cost  ratio  that  is  between  the  ratios  of  the 
two  alternatives  evaluated  over  their  current  economic 
lives.  The  validity  of  benefit  cost  ratios  as  criteria  and 
the  two  sufficient  assumptions  are  discussed  in  the 
appendix. 

Part  III  of  the  printed  output  (including  tables  1-4  of  the 
output)  provides  detailed  information  on  the  heat 
energy  and  fuel  balance  for  each  alternative.  Table  1  of 
the  output  shows  heat  energy  requirements  and  the 
proportions  of  energy  requirements  that  are  met  by 
wood  fuel  and  alternate  or  auxiliary  fuel  for  each 
alternative.  Table  1  also  shows  amounts  of  wood  and 
alternate  or  auxiliary  fuels  that  are  needed  annually  to 
meet  the  energy  requirements.  Table  2  describes 
physical  characteristics  of  the  wood  fuel  and  shows 
the  amount  of  heat  energy  calculated  as  recoverable 
from  the  wood  fuel  (the  recoverable  heat  energy 
estimate  is  used  in  COMPARE  to  determine  the 
quantity  of  wood  fuel  required  in  each  alternative  based 
on  heat  output).  Table  3  provides  parameters  related  to 
the  auxiliary  or  alternate  (nonwood  or  bark)  fuel.  Table 
4  shows  selected  parameters  in  terms  of  International 
System  (SI)  units. 

Program  Restrictions 

COMPARE  was  developed  as  an  analytical  tool  to  aid 
In  evaluating  project  feasibility,  and  as  a  research  tool 
for  economic  evaluation  of  energy  system  alternatives. 

It  is  important  for  the  user  to  recognize  that  parts  I  and 
III  of  the  program  output  are  not  adequate  to  rank  and 


compare  investment  alternatives  For  valid  comparison 
of  alternatives,  the  user  must  refer  to  part  II  of  the 
program  output,  which  contains  the  benefit  cost  ratios 

COMPARE  is  quite  versatile,  being  able  to  simulate  a 
variety  of  different  types  of  investment  alternatives 
Yet,  the  structure  of  analysis  is  somewhat  restricted  by 
the  structure  of  COMPARE  data  input  and  program 
output.  Restrictions  could  be  removed  by  making  the 
COMPARE  program  more  complicated,  but  in  its 
current  form  COMPARE  balances  sophisticated 
analysis  and  simplicity  of  data  input.  Some  of  the 
restrictions  are  discussed  here. 

One  restriction  is  that  COMPARE  can  simulate  the  use 
of  only  one  type  of  wood  or  bark  fuel  and  only  one  type 
of  auxiliary  or  alternate  fuel  under  each  alternative.  In 
order  to  simulate  the  use  of  more  than  one  type  of 
wood  or  alternate  fuel  it  is  necessary  to  enter  data  that 
simulate  average  parameter  values.  COMPARE  could 
be  reprogramed  to  handle  data  for  more  than  one  type 
of  fuel  in  each  alternative,  but  again  that  would  add 
complexity. 

Another  restriction  is  that  for  each  alternative 
COMPARE  permits  only  one  estimate  of  annual  heat 
energy  requirement,  which  remains  the  same  for  each 
year  in  the  planning  period.  In  some  cases,  it  might  be 
useful  to  assume  that  heat  energy  requirement  changes 
during  the  planning  period,  but  that  sort  of  assumption 
cannot  be  handled  by  COMPARE  in  its  current  form. 
Again,  the  restriction  could  be  removed  by 
reprograming  COMPARE  to  accept  and  analyze 
additional  data  input. 

Another  limitation  is  that  COMPARE  is  designed  for 
analysis  of  wood  or  bark  energy  systems  that  involve 
combustion  and  heat  recovery  from  combustion  gases, 
as  opposed  to  energy  systems  that  do  not  involve 
combustion.  COMPARE  contains  an  algorithm  which 
calculates  the  recoverable  heat  energy  from 
combustion  of  wood  or  bark  fuels,  and  uses  the 
recoverable  heat  estimate  to  determine  heat  output  per 
unit  of  fuel  and  amount  of  fuel  required.  A  user  should 
understand  that  COMPARE  is  designed  to  calculate 
recoverable  heat  energy  on  the  basis  of  physical 
parameters  given  in  tables  1  and  2.  The  recoverable 
heat  estimate  is  essentially  the  maximum  amount  of 
heat  energy  that  will  be  recovered  (e.g.  in  the  form  of 
steam)  given  the  specified  physical  parameters. 
However,  some  circumstances  could  result  in  actual 
heat  output  being  less  than  estimated  recoverable  heat 
energy.  Those  circumstances  include  situations  where 
the  furnace  and  boiler  system  are  used  very 
Intermittently,  or  where  heat  energy  is  wasted  after  it  is 
recovered.  Such  circumstances  generally  are  assumed 
not  to  apply  In  any  of  the  alternatives  the  user 
specifies. 

Summary 

COMPARE  has  considerable  versatility  and  can 
simulate  a  variety  of  different  types  of  investments  in 


wood  energy  systems  COMPARE  allows  considerable 
latitude  in  specification  of  the  fuel  type  and  associated 
physical  parameters,  parameters  of  the  energy  system, 
and  financial  and  economic  data  COMPARE  was 
developed  at  the  Forest  Products  Laboratory  as  an 
analytical  tool  for  a  variety  of  users;  researchers, 
managers,  engineers,  and  industrial  consultants.  It  is 
intended  that  COMPARE  will  contribute  to  wise  and 
efficient  use  of  forest  resources  in  the  area  of 
industrial  energy  systems. 
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-  I  I  J-L-j- 

j..  n  M- 

J 

: 

4-  L 

1  ij 

9  I oooop 

,  o  1  J- 

20  (,  0 

0  1,0 

i-1 

1  <.  0 

0  \c 

i . 

I  , 

1  j  j  |  j  f 

l  o 

0  10 

»  S .  S' 

0  •  AO 

2*  S  ./ 

i  s.x 

A.  AO  r  » 

0  .AO 

*  F  j  *  *  -•4 

“t 

;  ;  -i  j  ^ 

— 

-»  i-4- 

i- 

_ 

- 

i  -♦  - 

.. 

-LL 

.  i  i 

_1  , 

■j--»  l  |  I  i  |  ■ 

1  M  •  *  * 

H  S'.  I.S’  0  i.S. 

Y.i  o  o 

•  -  -  *  •  ■  • 

•  •  •  i  *  - 

• 

t  • 

1  i  ■ 

i  i 

*  4  1-  j  j 

2<  C  So 

O.r  IS 

*  0 

o.  1  o 

r  i  c 

o  .  1.0. 

1.  0 

0  1  0 

J? 

3S 

3* 

39 

36 

— Lj 

J 

Figure  T  —Sample  gala  input  visjsom 
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Card  Type  3:  FORMAT  (F5,F6,2A4,4(F5),F6,I1,2A4,F5,F4) 


inmmimnininMininreiaCTnmnraCTqf^riiiBwnsffira^ 


*  65  66  67  61  89  70  7  i  72  7J  7*  75  75  77  ’6  79  8 


Card  Type  4  FORMAT  (4F10.3F5.2F4) 


lOHB^MflDMlllIHEIHIMlOQEEESlSEESEJQEEDQEESEJEIJDKiQHnDEDCESEQQSQEaBJOEaOSE 

^■—5— ■■■■■——  M— MW  ■■■■■—■ —■■■■■ 


64  65  66  67  68  69  70  71  72  73  7«  75  75  77  78  79  8G 


[BHBBaBIilPEIIliaDHBHBBIEEBESlSElGMI^BEtgaBSGODEBKaEinBDfflnBBgSBEasaEESBiaBSEOlEIlilgEE 


tmannonasstBEEffiiBc 


17  |B  19  20  2i  22  23  2<|2b  26  27  26  29  30  3  «  3 


9  50,51  52  53  5*  55  56157  56  59  60  61  62  63  6 


iEEGPBBBE 


73  74  75  75  77  78  79  80 


PAXF  (Data  for  thaaa  paramalara  may  ba  antarad  by  antanng  annual  waluas  tor  aach 
RVAL  paramatar  and  for  aach  aitarnattva  Optionally,  data  may  ba  antarad  by  an  taring  only 

(optionai)^^-DEPR  firat  7**r  v*'u*>  ln  cotumna  1-8.  and  antanng  annual  rata  of  increase  for  tha  paramatar 

in  columna  9  16.  except  for  tha  paramatar  DEPR  ) 


Figure  2  —Data  card  format  and  program  parameters  for  card  types  1-6.  (ML83  5083) 
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PART  I.  FINANCIAL  SUMMARIES 
financial  summary--altepnat  i  vF  l 

FIRST  ALTERNATIVE  -  RETAIN  OLD  R  n  I  L  E  R  SYSTEM  FOR  FIVF.  Y  F  A  R  S  (GAS  FIRED) 


INVESTMFNT  PARAMETERS  (YEAR  0): 


DEPRFCIARLF  ASSETS  -  -  -  3  0 

nonofprec.  expenses-  -  -  a  o 
WORKING  capital-  -  -  -  -  $  20000 
OLD  FACILITY  NET  SALV.  -3  0 


ENDING  NET  SALVAGE  (YEAR  5)3  JOOOO. 
FFFECTIVE  annual  Tax  rate  -  -  -  -  .350 

NEAT  ENERGY  REQUIREMENTS  AND  OUTPUT: 
ESSENTIAL  RED.  -  -  2522  30 .  mmRTij/YR 

TOTAL  OUTPUT  -  -  -  2522  3  0  .  mmrtu/yR 


ANNUAL  COSTS,  DEPRECIATION  AND  AVERAGE  ANNUAL 
COST  PER  mmrTU  OF  TOTAL  ENEPGY  OUTPUTS 


FUEL  COSTS 

OTHER  VAR. 

FIXED 

DEPRF- 

COST/ 

wOOU-RARK 

GAS 

COSTS 

COSTS 

C I  A  T I  ON 

mmhtu 

$ 

5 

$ 

3 

$ 

3 

YEAR 

1 

0. 

1742378. 

35000. 

70000  . 

0. 

7.32 

YEAR 

2 

0. 

2177Q73. 

40250. 

60500, 

0. 

R .  1  1 

YEAR 

3 

0. 

2722466. 

46267. 

R2575. 

0. 

11.34 

YEAR 

a 

0. 

3403063. 

53231 . 

1 06461 . 

0. 

14.13 

YEAR 

5 

0. 

4253653. 

01215. 

1 22430. 

0. 

17. 5R 

BEFORE 

TAX 

NET  Expenses 

,  INVESTMENT  tax  credit. 

ADDITIONAL 

TNVFSTMENT 

( WORK  I NG 

CAPITAL) 

and  AFTER  tax 

NET  CASH 

FLOw  INCLUDING 

SALVAGE  (END  OF 

YFAR 

VALUES  )  : 

BEFORE  Tax 

TAX 

ADDITIONAL 

AFTER  TAX 

NET  EXPENSES 

CREDIT 

INVESTMENT 

NET  CASH  FLOw 

3 

5 

3 

3 

YEAR 

0 

0. 

-20000. 

YEAR 

1 

1847376. 

0. 

3600  . 

-1204396. 

YEAR 

2 

2298  7  23 . 

4248. 

-1498416. 

YEAR 

3 

2«61 329. 

5013. 

-1864676. 

YEAR 

4 

3562774. 

59 1  S . 

-23217)6. 

YEAR 

5 

4437499. 

6980. 

-261S5Q9. 

PRESENT 

VALUE  (YEAR  0)  OF 

AFTFP  TAX 

NET  CASH  FLOWS: 

$ 

-5394624.  at  20. 

0  percent 

ANNUAL  DISCOUNT 

PATE 

FINANCIAL  SUMMARY--ALTERNATIVE  2 

SECOND  ALTERNATIVE  -  INSTALL  new  WOOD  AND  OIL  FIRED  SYSTEM 


investment  Parameters  (YEAR  O); 


DEPRECIABLE  assets  -  -  -  3  1428000. 
NONOEPREC.  EXFENSES-  -  -  $  50000, 
WORKING  CAPITAL-  -  -  -  -  3  70000. 
OLD  FACILITY  NET  SALV.  -  3  80000. 


ENDING  NET  SALVAGE  (YEAR  10)S  160000. 

EFFECTIVE  annual  tax  RATE  -  -  -  -  .350 

ME  A  T  ENERGY  REQUIREMENTS  and  OUTPUT* 
ESSENTIAL  PFQ.  -  -  252230 .  mmbtu/YR 

TOTAL  OUTPUT  -  -  -  352230.  MMPTU/YP 


annual  COSTS,  depreciation  and  AVERAGE  annual 
COST  PER  mmRTU  OF  TOTAL  ENERGY  OUTPUTS 


FUEl 

COSTS 

OTHER  VAR. 

F  I  XF  0 

DEPRE- 

COST/ 

wOOO-BARK 

OIL 

COSTS 

COSTS 

C I  AT  ION 

MMHTU 

3 

% 

3 

3 

3 

3 

YEAR 

1 

222344. 

293525. 

75000. 

90000. 

21  4200. 

P.59 

YEAR 

2 

244576. 

366906. 

66250. 

103500. 

314160. 

3.17 

YEAR 

3 

269036. 

456633. 

49167. 

1 19026. 

299860 . 

3.54 

YEAR 

4 

295900. 

573291 . 

1 14066. 

1  3  6  S  7  9  . 

299860  . 

4.03 

YEAR 

5 

325534. 

716614. 

131175. 

15741  1  . 

299680 . 

4.63 

YEAR 

6 

35 6 Dp 7  . 

895767. 

150652. 

181022. 

0. 

4.50 

YEAR 

7 

393696. 

1119709. 

1  73480  . 

208175. 

0. 

5.36 

YEAR 

8 

433285. 

1 39963b. 

1  99501  . 

239402. 

0. 

6.45 

YEAR 

9 

476614. 

1  7495<ie. 

229427. 

275312. 

o. 

7.75 

YEAR 

1  0 

524275. 

2166932. 

263801  . 

316609. 

0. 

9.35 

Figure  3 ■  —  Sample  program  output 


REFORF  TAX  NET  ExPtNSES,  INVESTMENT  T  4  X  CREDIT,  ADPITIONAL  I  N  V  F  $  T  M  E  N  T  (WORKING 
Capital)  am*,  after  tax  net  cash  flow  t SCI  unjNr.  salvage  (Fno  of  yfar  valofF): 


BEFORE  TAX 

tax 

AOr»I  T  I  ON  A  L 

AFTER  TAX 

NFT  EXPENSES 

CRE  01  T 

INVESTMENT 

net  CASH  F L < 

A 

$ 

$ 

A 

YEAR 

0 

soooo. 

-tososoo. 

YEAR 

1 

995069. 

500000 . 

12600. 

1  19805. 

YEAH 

2 

1 1 1 53°5. 

1 86fe8  . 

-82571 U. 

YEAR 

3 

1 285  7  6 1  . 

175au. 

-527a  OQ . 

YEAR 

a 

1  820055. 

20702. 

-683658. 

year 

<5 

103061 3. 

28829. 

-789887. 

YEAR 

e 

1585728. 

28926  . 

-1  059589 . 

YF  AO 

7 

I«052b0. 

Saniu. 

-1265033. 

YEAR 

8 

2271825. 

a  0  1 37. 

-1516823. 

YF  AR 

0 

2730898. 

87362. 

- 1  8??a  uS . 

YEAR 

1  0 

3291657. 

55«87. 

-1669005. 

PRESENT 

VALUE  (YEAR  0)  OF 

after  tax 

NFT  C*SH  F  l  ()w  S  t 

$ 

-8260980.  AT  20. 

0  PERCENT 

annual  OISCO'iNT 

RATE 

FINANCIAL  SI'H"APY--A|.TER^ATIVE  3 

T  M I RO  ALTERNATIVE  -  INSTALL  nE.<  *000  A  NO  COAL  F  I  RFO  S Y  $T  E  M 

INVESTmFnT  PARAMETER?  (YEAR  0):  ENDING  F-E  T  SALVAGE  (YFAR  10)$  £00000. 

DEPRECIABLE  ASSETS  -  -  -  $  1828000.  EFFECTIVE  ANNUAL  TAX  PATE  -  -  -  -  .350 

NnNPFPREC.  Expenses-  •  •  1  70000.  HEAT  ENEPC.y  PFnulRF  »-EnTS  and  output- 

working  CAPITAL-  -  -  -  -  $  RO  0  00 .  ESSF-JTIAL  PEP.  -  -  252230.  wmmth/YR 

old  facility  NET  S*LV.  -  $  AOOnn.  TOTAL  fl* i T P"T  -  -  -  802230.  mmbT'i/yr 

ANNUAL  COSTS,  DEPRECIATION  a(D  AVER»C-F  ANNUAL 


COST 

PEP 

MMBTU  OF  TOTAL 

ENERGY 

OUTPUTS 

fuel 

COSTS 

OTHER  VAP. 

F  IXEO 

OEPRE- 

COST/ 

KOOO-HAPK 

COAL 

COSTS 

COSTS 

CIATION 

P  HP  Tl.l 

$ 

l 

$ 

A 

A 

A 

YE  *P 

1 

22569a. 

325 1*6. 

9  0  0  0  fi  . 

1 nonnn. 

278200. 

2.52 

YEAP 

2 

288268. 

373968. 

103800. 

1  1  8  0  o  0  . 

802160. 

3.09 

YEAP 

3 

2  7  3  0  9  J  . 

830058. 

t 1°028. 

1 38250. 

363880. 

3.33 

YEAP 

a 

300399. 

808867 . 

1 36679. 

152087. 

3m  388  0  . 

3.68 

YEAR 

5 

330839. 

866752. 

15781 1 . 

1  78901  . 

383880. 

8 . 0? 

YEAR 

6 

36  3R8  3 . 

658065. 

181 022. 

2° 1 1 3b . 

0. 

3.88 

YEAP 

7 

399831  . 

752178. 

208178. 

231 306. 

o. 

3.96 

YEAR 

8 

839818. 

86500  1  . 

239802. 

266002. 

0. 

9.50 

YEAR 

0 

U8379b. 

998751  . 

275312. 

305902. 

o. 

5.12 

YEAP 

1  0 

532176. 

1  1  83968  . 

316609. 

35178?. 

0. 

S .  8  3 

BEFORE 

TAX 

NET  FXPENSFS, 

INVESTMENT  TAX  C.REOJT, 

AOniTIOf-AI. 

TNVESTHE NT 

r  wORk I ng 

CAPITAL) 

AND  AFTER 

TAX 

NET  CASH 

FLOW  INCLUDING 

SALVAGE  fF.NO  of  year 

VALUES) S 

PFFliRE  TAX 

TAX 

additional 

AFTER  tax 

met  expenses 

CRF  01 T 

INVESTMENT 

NET  CASH  FLOw 

A 

A. 

A 

A 

YE  AR 

0 

70008. 

-1863500. 

YEAR 

1 

1818080. 

650080. 

16200. 

2861 98. 

YEAR 

2 

1282888. 

19116. 

-828833. 

YEAP 

.3 

1 336308. 

22557. 

—  80857  9 . 

YEAR 

9 

18678)3. 

26617. 

-596815. 

YEAR 

5 

1615383. 

3)808. 

-697527. 

YEAR 

b 

1 399706. 

370b?. 

-086871 . 

YEAR 

7 

1591888. 

83733. 

-1078200. 

YE*P 

8 

1810219. 

BJ605. 

-122P287. 

YEAP 

9 

205°761 . 

6  0  8  9  o  . 

-1  399736. 

YEAR 

1  0 

2388536. 

71858. 

-928757. 

• 

PRESENT  VALUE 

(YEAR  0)  OF 

aftfr  tax  net 

CASH  FLOWS: 

$  -aiSPaJb.  at  20.0  percent  annual  DISCOUNT  hate 


Figure  3.— Sample  program  output  (continued). 


PART  II.  BENEFIT  COST  RATIOS  FOP  ALL  ALTERNATIVES 


FIRST  YEAR  HEAT  ENERGY  VALUES  (USER  SPECIFIED)  and  DISCOUNTED 
PRESENT  VALUE  OF  hE*T  ENERGY  FOP  EACH  ALTERNATIVE: 

HEAT  ENERGY  VALUE  (S/mmrtij)  PRESENT  VALUF  OF  HEAT  ENERGY  DISCOUNT 


essential 

SURPLUS 

(BASED  ON 

(INCLUOING 

RATE 

ENERGY 

ENERGY 

ESSFNTIAL  ) 

SUPPL'JS) 

(PCT .  ) 

ALT 

1  6. OP 

5. SO 

630S7S0. 

630S750. 

50.0 

ALT 

5  6.00 

S.SO 

l?6l 1 4RR . 

17190*33. 

50. P 

alt 

3  6.00 

S.SO 

1?61 t«RR. 

1 90*6099. 

50. P 

RANKING  OF  ALTERNATIVES  BY  HIGHEST  BENEFIT  COST  RATIO 
(PATIO  OF  P.V.  OF  HEAT  ENERGY  OUTPUT  TO  P.V.  rif  AFTER  TAX 
NET  CASH  FLO*}  BASE  0  ON  ESSENTIAL  HEAT  E  Nf  RG Y  REQUIREMENTS: 


R/C  RATIO 

ALT  3  5. OS 

alt  5 

ALT  1  1.17 


PERU  I R£  0  NFT  INVESTMENT 

lROBOOO  .0 
1R6B000.0 
50000.0 


RANKING  OF  ALTERNATIVES  BY  highest  BENEFIT  COST  RATIO 
BASEO  ON  TOTAL  heat  ENERGY  OUTPUT  (INCLtlOlNG  SURPLUS): 


B/C  PATIO 

ALT  3  u.foR 

ALT  5  a.ou 

ALT  1  1.17 


RF QU 1  RE 0  NET  INVESTMENT 

1ROBOOO.O 
1 fl6«0PQ.  0 
5PPO0.O 


PART  III.  OESCPIPT  in».i  PE  ENERGY  PAt.ANCF  AND  FUEl  PARAMETERS 
FOR  EACH  ALTERNATIVE  fTABLFS  1  TO  0) 

TABLE  1.--HEAT  ENERGY  BALANCE  AND  Fllf I  REQUIREMENTS  (ANNUAL  BASIS) 


ESSENTIAL  ENERGY 

SURPLUS  ENERGY 

TOTAL  ENFRGY 

REGUJRFMF  NTS 

RF  0U I Pfc  ME  NTS 

OUTPUT 

(M«RTU) 

f  H  N  B  T  U  ) 

(NMHTII) 

ALT 

1 

5S553P. 

o. 

5S?5  50 . 

ALT 

5 

5S553P . 

1 OPPPO. 

3S??30. 

ALT 

3 

5S5530. 

1SOOOO. 

O0??SP. 

ENERGY  SUPPLIED  °v  ENERGY  SUPPLIFO  By  OT  HF  R  OR 

<*.100-BAPK  FUEL  ( PC  T  .  (IF  AIIXTLIAPY  FUFL  (PCT.  OF 

(mmo.tu)  TOTAL  )  (  rmb  T  U )  TOTAL) 


ALT  1  P.  .0 
ALT  5  51 7 P 0 7 .  op.p 
ALT  3  3517*0.  *0.0 


5B5530.  lnn.o 

3B??3.  1P.0 

*000*.  ?0.0 


QUANTITY  OF  KHOO-BARK  EuFL  OTmFR  FUEL 

rtOUD-HARK  AVAILABLE  R£  ()•  i  I  RF  mE  NTS  REOuIWFmFNTS 


ALT 

1 

3OP00. 

') .  0 . 

TON 

0. 

0.1). 

TUN 

331  PS?. 

MCF 

(  GAS) 

ALT 

5 

30PPP. 

0.0. 

TUN 

57793. 

0.0. 

TON 

*9*9. 

BBL. 

(  OIL) 

ALT 

5 

30000. 

O.n. 

TON 

5*515. 

o.D. 

TON 

G003. 

TON 

(COAL  ) 

Figure  3.— Sample  program  output  (continued). 


table  2.--woop-bark  eiiei  PARAhetEPS  and  estimated  heat  RECOVFPY 


OVENDRY  w  T  (LBS) 

HOI  STUPE  CONT. 

"E  T  KT  (IBS) 

“OISTIJPE  C.O’T. 

PEP  SALES  unit 

(DRY  WT  BASIS) 

PEP  SALES  UNIT 

(BET  T  BASIS) 

ALT 

1 

2000. /O.O.  TON 

.B2 

3b36./O.D.  TON 

.US 

Al  T 

2 

2000. /n.r>.  TON 

.62 

3b3b./O.C.  TON 

.US 

ALT 

3 

2000. /O.O.  TON 

.B? 

363p. /O.O.  TON 

.  U5 

HIGHER  HEAT  VALUE.  -----  ESTIMATED  HEAT  ENERGY  PEC  l1  VERY  -  -  -  -  - 
(HTU/DRY  LB)  fHTU/PPY  L«)  (RTU/*EI  IB)  ( NMh  T 1 1  /  S  A  L  E  S  IJNIT) 


ALT 

1 

S  7  0  0  . 

S  7  0  3  . 

3137. 

1 1 .U 06/0.0, 

TON 

ALT 

2 

S700. 

5703. 

3137. 

1 1 .U 06/0.0. 

TON 

alt 

3 

B  7  0  0  . 

5703. 

3137. 

1 1 .U06/0.0. 

TON 

table 

3. --OTHER  OR 

AUXILIARY  EUFL 

PARAMETERS 

TYPE  OF  hIGHE.p  HEAT  VALUE 

ESTIMATED  heat  RECOVERY 

FUEL 

(mmbtU) 

(MHBTU) 

alt 

1 

GAS 

1.00/  MCE 

.76/  MCE 

ALT 

2 

nil 

6. 30/BBL  . 

5.0U/BRL . 

ALT 

* 

COAL 

?U  .  00/  TON 

lb. OB/  TON 

TABLE  p. --INTERNATIONAL  SYSTEM  (SI)  UNIT  RECOVERABLE  HEAT  ENERGY  ESTIMATES 


ENERGY  IN  wOOD-BAPK 

FUEL  ------- 

-  -other  fuel  -  - 

(KJOUl E/KG 

(K  J(UILE/kG 

(BILLION  JOULF 

(BILLION  JOULE 

DRY  BASIS) 

PET  BASIS) 

PFP  SALES  UNIT) 

PEP  S A l FS  UNIT) 

ALT 

1 

13275. 

7301  . 

26. 6/0. D.  TON 

l.fl/  MCE 

ALT 

2 

13275. 

7301  . 

26.6/0.0.  TON 

1  1  ,  7  /  R  R 1.  , 

ALT 

3 

13275. 

7301  . 

2b. 6/0. D.  TON 

37,  u/  TON 

Figure  3.— Sample  program  output  (continued). 
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Appendix 


Benefit  Cost  Ratios  in  COMPARE 
A  major  purpose  of  COMPARE  is  to  provide  an 
objective  comparison  of  different  investment 
alternatives  in  wood  or  bark  energy  systems.  However, 
in  the  case  of  investment  alternatives  in  wood  and  bark 
energy  systems  it  is  likely  that  the  economic  lives, 
initial  investment  requirements,  and  the  discount  rates 
will  all  be  different  among  different  alternatives.  It  is 
necessary  therefore  to  adopt  an  economic  criterion 
which  will  be  valid  for  comparison  despite  the  varied 
nature  of  the  alternatives. 

Consider  discounted  benefit  cost  ratios  which  are 
generally  valid  criteria  even  if  the  discount  rates  and 
investment  requirements  are  different  among 
alternatives.  Discounted  benefit  cost  ratios  are  derived 
on  the  basis  of  discount  rates  and  therefore  take  into 
account  any  difference  in  discount  rates.  If  the 
investment  requirements  are  different,  the  opportunity 
cost  of  higher  capital  requirements  for  one  alternative 
can  be  taken  into  account  by  simply  increasing  the 
discount  rate  for  the  higher  investment  alternative.  The 
difference  in  discount  rate  will  again  be  reflected  in  the 
benefit  cost  ratio.  Hence,  the  only  problem  in  regard  to 
use  of  benefit  cost  ratios  as  criteria  is  that  of  unequal 
economic  lives. 

As  will  be  shown  here,  the  discounted  benefit  cost  ratio 
will  serve  as  a  valid  criterion  for  comparison  of  any.  two 
investment  alternatives  provided  that  two  sufficient 
assumptions  can  be  made.  The  sufficient  assumptions 
are  that  (1)  both  alternatives  are  replaced  by 
replacement  projects  which  both  have  the  same  benefit 
cost  ratio  and  which  carry  the  planning  period  forward 
to  an  equal  overall  planning  period  for  both 
alternatives,  and  (2)  the  replacement  project's  benefit 
cost  ratio  is  numerically  in  the  same  range  as  (e.g. 
between)  the  benefit  cost  ratios  of  the  two  investment 
alternatives  over  their  current  economic  lives.  Under 
these  reasonable  assumptions,  the  most  economical  of 
two  current  investment  alternatives  will  always  be  the 
one  with  the  highest  benefit  cost  ratio,  calculated  over 
the  economic  life  of  each  alternative,  even  if  the 
alternatives  have  different  economic  lives. 

Consider  any  two  investment  alternatives.  The  two 
alternatives  may  have  different  economic  lives, 
different  initial  investment  requirements,  and  different 
discount  rates.  Economic  common  sense  implies  that 
the  two  alternatives  cannot  be  compared  directly 
unless  they  represent  the  same  interval  in  time,  the 
same  planning  period.  For  example,  suppose  there  are 
two  mutually  exclusive  investment  alternatives  which 
involve  installation  of  two  different  types  of  boiler 
systems.  One  system  has  an  economic  or  service  life 
which  is  30  percent  longer  than  the  other.  Just  the 
benefits  and  costs  of  the  two  alternatives  alone  will  not 
show  which  alternative  Is  most  economical  because 
the  cost  of  replacing  the  shorter  lived  alternative  must 
be  considered  Replacement  projects  have  benefits  and 
costs  which  must  be  considered,  and  may  have 
different  economic  lives.  In  fact,  It  Is  necessary  to 
choose  a  planning  period  which  includes  the  economic 
lives  of  current  investments  plus  the  lives  of  selected 


replacement  projectjs)  for  both  alternatives,  such  that 
the  overall  planning  periods  are  equal  for  both 
alternatives.  (Note  that  if  both  current  investment 
alternatives  have  the  same  economic  life,  replacement 
projects  need  not  be  considered  ) 

It  should  be  noted  at  this  point  that  the  standard 
approach  to  the  problem  of  unequal  economic  lives, 
which  is  recommended  in  many  texts,  is  to  try  to 
estimate  the  cash  flows  of  replacement  projects  such 
that  cash  flows  will  be  obtained  for  both  alternatives 
over  an  equal  planning  period.  However,  anyone  who  is 
familiar  with  cost  estimation  knows  that  estimation  of 
costs  and  numerical  benefits  for  a  replacement  project 
is  a  very  imprecise  task  especially  if  the  project  is 
scheduled  for  many  years  from  now.  It  is  often  difficult 
just  to  obtain  reliable  estimates  for  well  understood 
current  investment  alternatives,  let  alone  tentative 
future  replacement  projects.  In  developing  COMPARE 
the  obvious  question  was  asked— "Is  there  some  way 
to  avoid  the  difficult  task  of  having  to  estimate  benefits 
and  costs  for  future  replacement  projects,  and  still  be 
able  to  use  the  simple  benefit  cost  ratios  of  current 
alternatives  as  a  valid  criteria  for  comparison?”  The 
answer  was  “yes”  provided  that  two  sufficient 
assumptions  (introduced  previously)  can  be  made.  The 
rationale  for  why  those  assumptions  permit  use  of 
benefit  cost  ratios  in  directly  comparing  two 
Investment  alternatives  is  presented  as  follows. 

Let  the  benefit  cost  ratios  of  two  investment 
alternatives  be  denoted  as  B1/C1  and  B2/C2 
respectively.  In  both  cases,  the  benefit  cost  ratios  are 
the  ratio  of  discounted  benefit  values  to  discounted 
costs  (or  after  tax  net  cash  flows  based  on  costs  as  in 
COMPARE).  Thus, 

(Present  value  of  benefits  for  first  alternative)  _  B1 
(Present  value  of  costs  for  first  alternative)  Cl 

(Present  value  of  benefits  for  second  alternative)  _  B2 

(Present  value  of  costs  for  second  alternative)  C2 

In  considering  future  replacement  projects  It  is 
necessary  to  establish  a  basic  fact  about  benefit  cost 
ratios.  The  fact  is  that  if  associated  benefits  and  costs 
are  further  discounted  to  an  earlier  point  in  time,  the 
numerical  value  of  the  benefit  cost  ratio  will  remain  the 
same.  That  fact  is  true  regardless  of  the  discount  rate 
or  length  of  discount  period.  For  example,  consider 
some  future  replacement  project.  The  replacement 
project  has  benefit  values  and  costs  which  can  be 
discounted  to  the  beginning  of  the  economic  life  of  the 
project  (some  future  point  In  time).  The  discounted 
benefits  and  costs  can  then  be  expressed  as  a  benefit 
cost  ratio  for  the  replacement  project.  Now  suppose 
that  the  same  benefit  values  and  costs  are  discounted 
to  the  present  point  in  time,  and  are  then  expressed  as 
a  present  benefit  cost  ratio.  The  fact  is  that  the  present 
benefit  cost  ratio  will  be  exactly  the  same  as  the 
benefit  cost  ratio  derived  for  the  future  point  In  time. 


Denote  the  benefit  cost  ratio  of  the  future  replacement 
projects  as  Brl/Crl  for  the  first  alternative  and  Br2/Cr2 
for  the  second  alternative.  A  replacement  project 
benefit  cost  ratio  is  the  ratio  of  discounted  benefit 
values  (Br)  to  discounted  costs  (Cr)  for  the  replacement 
project.  Benefits  and  costs  are  discounted  to  the  future 
point  in  time  at  which  the  replacement  project  begins 
and  at  which  the  economic  life  of  the  current 
investment  ends.  That  point  in  time  will  be  denoted  as 
year  n  for  the  first  alternative  and  year  m  for  the 
second  alternative.  Thus, 


For  1st  Brl(n)  = 
Alt.:  Crl(n) 


For  2nd  Br2(m) 
Alt.:  Cr2(m) 


(Year  n  value  of  benefits 
for  the  replacement  project) 


(Year  n  value  of  costs 
for  the  replacement  project) 


(Year  m  value  of  benefits 
for  the  replacement  project) 


(Year  m  value  of  costs 
for  the  replacement  project) 


The  first  sufficient  assumption  is  that  future  replace¬ 
ment  projects  for  both  alternatives  will  have  the 
same  benefit  cost  ratio.  The  assumption  implies  that 
Br1(n)/Cr1(n)  =  Br2(m)/Cr2(m).  It  can  now  be  observed 
that  if  a  replacement  project’s  benefits  and  costs  are 
discounted  to  prevent  values  and  are  then  expressed  as 
a  ratio,  the  ratio  will  equal  the  original  benefit  cost 
ratio  for  the  replacement  project,  in  other  words,  if 
Brl(p)  is  the  present  value  of  benefits  and  Crl(p)  is  the 
present  value  of  costs  for  the  replacement  project 
under  the  first  alternative,  then  the  foiiowing  ratios  are 
equal: 

Brl(p)  _  Br1(n)/(1  +  i)n  _  Brl(n) 

Crl(p)  Cr1(n)/(1  +  i)"  Crl(n) 

(where  i  is  the  discount  rate). 

Likewise,  if  Br2(p)  equals  the  present  vaiue  of  benefits 
and  Cr2(p)  equals  the  present  vaiue  of  costs  for  the 
replacement  project  under  the  second  alternative,  the 
foiiowing  ratios  are  also  equal: 


Br2(p)  = 
Cr2(p) 


Cr2(m)/(1  +  if 


=  Br2(m) 
Cr2(m) 


it  is  true  then  that  the  following  equality  holds: 

Brl(p)  _  Br2(p) 

Crl(p)  Cr2(p) 

Brl(n)  _  Br2(m) 

Because,  by  assumption.  -  Cr2(m) 

It  is  finally  necessary  to  recognize  another  basic  fact 
concerning  mathematical  ratios  and  combinations  of 
ratios.  Suppose  there  are  four  numerical  values,  B1,  Cl, 
B2,  and  C2  (the  values  are  analogous  to  the  present 
values  of  benefits  and  costs  of  two  current  investment 
projects  or  alternatives,  which  may  have  different 
economic  lives).  Suppose  arbitrarily  that  the  ratios  of 
the  values  are  different  so  that  one  ratio  Is  greater  than 
the  other  as  follows: 


B1  B2 

Cl  C2 

(if  the  ratios  are  benefit  cost  ratios,  It  would  appear 
that  the  first  alternative  is  more  economical  because  it 
has  a  higher  benefit  cost  ratio.  However,  as  discussed 
earlier,  replacement  project  benefits  and  costs  must 
also  be  considered  if  the  two  current  alternatives  have 
different  economic  lives.) 

Furthermore,  suppose  there  are  four  other  numerical 
values,  Br  1  (p),  Crl(p),  Br2(p),  and  Cr2(p).  (Those  values 
correspond  to  the  present  values  of  benefits  and  costs 
of  replacement  projects  under  the  two  alternatives.  The 
replacement  projects  in  both  cases  carry  the 
alternatives  forward  to  a  planning  period  which  Is  the 
same  for  both  alternatives.)  Now  we  can  assume 
that  those  values  satisfy  the  following  relationship: 

Brl  (p)  =  Br2(p) 

Crl(p)  Cr2(p) 

(This  corresponds  to  the  first  sufficient  assumption 
that  benefit  cost  ratios  are  the  same  for  replacement 
projects  under  both  alternatives.)  Also  assume  that  the 
foiiowing  relationship  holds: 

B1  >  Brl(p)  =  Br2(p)  >  _B2_ 

Cl  Crl(p)  Cr2(p)  C2 

(This  relationship  corresponds  to  the  second  sufficient 
assumption  that  the  benefit  cost  ratios  of  replacement 
projects  are  numerically  between  the  benefit  cost  ratios 
of  the  two  current  investment  alternatives.) 

Then  it  is  a  fact  that  so  long  as  the  previous 
assumptions  hold,  the  foiiowing  result  always  holds 
regardless  of  the  values  represented  by  the  eight  terms: 


Cl  +  Crl(p) 


C2  +  Cr2(p) 


(The  last  result  says  simply  that  the  benefit  cost  ratio 
of  the  first  alternative  is  higher  than  the  benefit  cost 
ratio  of  the  second  alternative,  even  when  replacement 
projects  and  an  equal  planning  period  for  both 
alternatives  are  taken  into  account.) 

A  proof  of  the  iast  result  Is  given  as  follows: 

Suppose  B1  >  B2  (arbitrary  assumption), 

Cl  C2 

Brl(p)  -  Br2(p)  (first  sufficient  assumption), 
Crl(p)  Cr2(p) 


B1  >  Brl(p)  =  _Br2(pl  >  J32_ 
Cl  Crl(p)  Cr2(p)  C2 


(second  sufficient  assumption). 
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B1  >  B1  +  Brl(p)  >  Brl(p) 
Cl  Cl  +  Crl(p)  Crl(p) 


Br2(p)  >  B2  +  Br2(p)  >  _B2_ 

Cr2(p)  C2  +  Cr2(p)  C2 

therefore, 

B1  +  Brl(p)  >  B2  4-  Br2(p) 

Cl  +  Crt(p)  C2  +  Cr2(p) 

Thus,  under  the  two  sufficient  assumptions,  the 
following  resuit  wiii  be  true: 

B1  >  B2  implies  B1  +  Brl(p)  >  B2  +  Br2(p) 

Cl  C2  Cl  +  Cr1(p)  C2  +  Cr2(p) 

Likewise,  under  reverse  assumptions,  the  opposite  wiii 
also  be  true: 

B2  >  B1  implies  B2  +  Br2(p)  >  B1  +  Br1(p) 

C2  Cl  C2  +  Cr2(p)  Cl  +  Crl(p) 

Therefore,  under  the  two  sufficient  assumptions 
regardless  of  the  economic  lives  of  two  current 
investment  alternatives,  the  one  with  the  highest 
benefit  cost  ratio  wiii  be  the  most  economical  even 
when  replacement  projects  and  equalized  pianning 
periods  are  considered.  Under  the  two  sufficient 
assumptions,  it  is  not  necessary  to  consider 
replacement  projects  or  equalization  of  pianning 
periods  for  either  aiternative,  provided  that  discounted 
benefit  cost  ratios  are  used  to  compare  the  two 
alternatives. 


Finally,  the  appropriateness  of  the  two  sufficient 
assumptions  can  be  addressed,  in  regard  to  the  first 
assumption  of  equal  benefit  cost  ratios  for  replacement 
projects  over  equai  pianning  periods,  it  may  be  heipfui 
to  think  of  the  replacement  projects  for  both 
alternatives  as  extending  over  an  infinite  pianning 
period.  As  the  pianning  period  goes  to  infinity,  it 
becomes  relatively  equai  for  both  alternatives.  Also,  if 
the  same  sort  of  replacement  project  will  be 
undertaken  in  both  alternatives,  it  follows  that  both 
replacement  projects  have  the  same  benefit  cost  ratio. 
The  second  sufficient  assumption  that  the  replacement 
project  benefit  cost  ratio  wiii  be  between  the  benefit 
cost  ratios  of  the  two  current  alternatives  is  equivalent 
to  saying  that  the  future  replacement  project  wiii  be 
neither  iess  economical  than  the  least  economical 
current  aiternative,  nor  more  economical  than  the  most 
economical  current  aiternative.  Both  assumptions  must 
be  recognized  as  merely  sufficient,  not  necessary 
assumptions,  in  other  words,  benefit  cost  ratios  may 
stiii  be  valid  criteria  for  comparing  two  alternatives  in 
certain  cases  where  the  assumptions  are  not  met. 

in  summary,  it  is  vaiid  to  compare  any  two  current 
investment  alternatives  by  comparing  their  benefit  cost 
ratios  even  If  the  two  alternatives  have  different 
economic  lives  (e.g.  the  most  economical  aiternative  is 
the  one  with  the  highest  benefit  cost  ratio),  provided 
the  following  two  sufficient  assumptions  can  be  made: 
(1)  the  replacement  projects  which  carry  the  pianning 
periods  forward  to  an  equai  pianning  period  wiii  have 
the  same  benefit  cost  ratio  in  both  cases,  and  (2)  the 
replacement  project  benefit  cost  ratio  wiii  be  numeri¬ 
cally  in  the  range  (e.g.  between)  the  benefit  cost  ratios 
of  the  two  current  investment  alternatives.  Under  those 
assumptions,  the  investment  with  the  highest  current 
benefit  cost  ratio  is  indeed  the  aiternative  which 
provides  the  greatest  discounted  return  per  unit  of 
discounted  cost. 
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OEPR  ( J , 5 )  =  0.07  *  9(1  ) 
OEPP  ( J , 6 )  *  0.07  *  9(1) 
OEPP  ( J ,  7 )  a  0.06  *  9(11 
OEPP  (J,8)  *  0.06  *  9(1) 
DEPP  ( J , 9 )  a  0.06  *  9(1) 
OEPP  ( J , 1 0 )  s  0.06  *  «(1  ) 
OEPP  (J(111  «  0.06  *  9(11 
OEPP  (J, I?)  a  0.06  *  9(1) 
DEPP  (J,13)  *  0.06  *  9(1) 
OEPP  ( J, 19)  »  0.06  «  «(1) 
OEPP  ( J , 1 5 )  a  0.06  *  9(1) 
GO  TO  10 
2  CONTINUF 

IF  (NK.FQ.3)  GO  TO  21 
IF  (nk.EQ.5)  GO  TO  22 
IF  (NK.EO.101  GO  TO  21 
IF  (NK.EO.15)  GO  TO  29 
GO  TO  <1 

2 1  CONTINUE 

OEPP  <J,1)  «  0.29  *  9(1) 
OEPR  (J,?)  *  0.97  *  9(1) 
OEPR  (J,3)  «  0.29  *  "(1  ) 
GO  TO  10 

22  CONTINUE 

OEPR  <J,1)  «  0.19  «  B ( 1  ) 
OEPR  (J,2)  «  0.33  *  8(1) 
OEPR  ( J, 3)  «  0.25  *  8(1) 
OEPR  ( J , 9 )  *  0.16  *  8(1) 
OEPR  (J,$)  a  0.08  *  8(1) 
GO  TO  10 

23  CONTINUE 

OEPP  (J,1)  *  0.09  *  9(1) 
OEPR  (J ,2)  «  0.19  *  9(1) 
OEPP  ( J , 3 )  »  0.16  *  8(1) 
OEPP  ( J ,  9 )  *  0.19  *  8(1) 
OEPP  ( J , 5 )  *  0.12  *  »(1  ) 
OEPP  ( J ,  6 )  *  0.10  *  9(1  ) 
OEPR  ( J , 7 )  s  0.08  *  8(1) 
OEPR  ( J ,  8  )  a  (1.06  *  9(1) 
OEPP  ( J , 9 )  a  0.09  *  8(1) 
OFPP  (J,10)  a  0.02  *  8(1) 
GO  TO  10 
29  CONTI NUt 

OEPR  (J,1)  *  0.06  *  9(1) 
OEPP  (J ,2)  a  0.12  *  B(1) 
OEPP  ( J, 3)  «  0.12  *  8(1  ) 
OEPR  ( J , 9 )  *  0.11  *  9(1  ) 
OEPR  ( J,5)  *  0.10  *  8(1) 
OEPP  ( J , 6 )  *  0.09  *  8(1  ) 
OEPR  ( J, 7)  a  0.08  «  9(1) 
OEPR  ( J ,  8 )  a  0.07  *  8(1) 
OF  PR  ( J,9)  a  0.06  *  8(1  ) 
0EP»  ( J , 10)  a  0.05  *  8(1) 
OEPR  (J,1  l)  a  0.09  *  P(l) 
OEPP  (J, 12)  a  0.09  *  9(1) 
OEPR  ( J , 1 3 )  a  0.03  *  9(1  ) 


DEP00670 
PFP00680 
DEP00690 
DEP00700 
DEP00710 
OEP00720 
DEP00730 
OEP00790 
(1EP00750 
DFP00760 
DEP00770 
DEP00780 
DEP00790 
0EP008Q0 
OF  P0081 0 
DEP00820 
DEPOO03O 
DEP00890 
OFP00850 
DEP00860 
DEP0087O 
(1EP00B80 
DFP00990 
DEP00900 
DEP00910 
0EP00920 
DF.P00930 
OEP0O99O 
OEP00950 
DEP00960 
OEP00970 
0EP00O80 
DEP00990 
OEPOIOOO 
OEPOIOIO 
0EP01020 
OEPOIOIO 
DEPO 1090 
DEP01050 
DEPO 1 060 
OEP01070 
0EP01080 
DEPO 1 090 
DEP01 100 
DEPO 1 110 
DEP01120 
0EP01 130 
DEPO 1 190 
OEPOl 150 
0EP01 160 
OEPOl 170 
DEPO110O 
OEPOl 190 
DEP01200 
PE001210 
OEPOl 220 
OEP01230 
OEPO  1  ?9  0 
DEPO 1 250 
OEPO 1 260 
OEPO 1 270 
OEPOl 280 
DEPO 1290 
0FP01 300 
OEPO 1 3 1 0 
OEPOl 3?0 
OEPOl 330 
OEPOl 390 
OEPOl 350 
OEPOl 360 
OEPOl 370 
OEPOl 380 
OEPOl 390 


1«?. 

DEPP  (J,18) 

=  0.0?  *  8(11 

DEP01 ooo 

183. 

OEPW  ( J ,  1  5 1 

=  0.01  *  8(1  1 

df;poi  oio 

1««. 

fin  to  in 

DEP01 0?0 

i«s. 

3 

COM  I  NUf 

DtPOl 030 

186. 

I f  (MT.EQ.5l  GO  TO  31 

DFpO 1 ooo 

187. 

IF  (NK.Fn.5)  G D  TO  3? 

Ot  PO 1 050 

18H. 

IF  (NK.EO.101  GO  TO  33 

OF  P01 060 

1  U8. 

IF  (NK.tQ.151  nn  TO  30 

OF  PO  1  <1  7  0 

ISO. 

GO  TO  u 

DFPO 1 yRO 

151  . 

31 

CONT  IfJOt 

0FP01 080 

15?. 

DtPP  (.1.11 

=  0.33  *  8(11 

OEPOISOO 

155. 

DEPP  fj,?1 

s  0.05  *  8(11 

DF  PO 1 5 1 0 

15«. 

OfPP  ( J  •  3 1 

=  0.??  *8(1) 

Dt  PO 15?0 

155. 

GO  TO  10 

Ot  PO 1 5  30 

156. 

3? 

CONTINUE 

DEP01500 

157. 

OFFR  CJ.11 

s  0.?0  *  8  (1  ) 

OF.PO  1550 

156. 

DEPP  (J,?1 

«  0.3?  *  8(1) 

DFPO 1 560 

15<». 

DFPP  ( J , 3 1 

=  O.po  *  8(1) 

0  E  P  0  1  5  7  0 

160. 

DEPP  CJ.O) 

=  0.16  *  8(1) 

DF  PO  1  580 

161  . 

DFPP  ( J , 5 1 

s  0.08  *  8(1) 

DFPO 1 580 

16?. 

Gl)  TO  10 

DFPO 1 600 

165. 

33 

continue: 

DEPOlolO 

16«. 

DFPP  (J,ll 

=  0.10  *  8(11 

D  E  P  0  1  6  ?  0 

165. 

DEPP  <J,?1 

s  0.18  *  RM1 

DtPOl 630 

166. 

DEPP  ( J , 3 1 

s  0.16  *  «(11 

DEPOlbOO 

167. 

DEPP  (J.oi 

=  0.10  *  8(1  ) 

DFP0165Q 

16«. 

DEPP  ( J . 5 ) 

=  0.1?  *  8(11 

Dt  PO 1 660 

160. 

DFPP  f),6l 

II 

o 

• 

» 

X 

DFP01 670 

170. 

DEPP  f  J , 7 1 

=  0.08  *  8(1) 

DEPO 1680 

171  . 

DFPP  (J.81 

=  0.06  *  8 ( t ) 

DEPO 1680 

17?. 

DEPP  (J.O) 

*  0.00  *  B( 1 ) 

DE  PO 1 7  00 

173. 

DEPP  (J.10) 

*  0.0?  *  8(1) 

DEPO 1 710 

170. 

GO  TO  10 

DEPO 1 7?0 

175. 

3o 

continue 

DEPO 1 730 

176. 

DEPP  (J.l) 

*  0.07  *  8(1  ) 

DEPO 1700 

177. 

DFPP  (J,?) 

s  0.1?  *  P(t) 

DEP01 750 

1 78  . 

DEPP  ( J , 3 1 

»  0.1?  *  8(1) 

DEPO 1760 

1 70 . 

DEPP  (J.O) 

*  0.11  *  8(11 

DEP01770 

160. 

OEPR  ( J ,5 1 

s  O.tO  *  8(1) 

DEPO 1 780 

161. 

OEPR  ( J . 6 1 

s  O.OP  *  8 ( t ) 

DEPO 1 780 

18?. 

DEPP  ( J , 7 1 

s  0.08  *  R ( 1 ) 

DEPO 1 800 

183. 

DEPP  ( J , 8 1 

*  0.07  *  B (  1  ) 

DEPO 1 810 

180. 

DEPP  (J.O) 

*  0.06  »  8(1) 

DEPO  1  B?0 

185. 

DEPP  (J,10) 

*  0.05  *  8(1) 

DEPO 1830 

186. 

OEPP  ( J  ,  1  1 ) 

*  0.0O  *  B(  1  ) 

DFP01800 

187. 

DEPP  (J.l?) 

*  0.03  *  BCl) 

DFpO 1 850 

188. 

DEPP  (J, 1 3) 

*  0.03  *  8(1) 

DEPO 1 860 

180. 

OEPR  C  J  ,  1 0 ) 

*  0.0?  *  8(1) 

DEPO  1  870 

1O0. 

DEPP  (J.l 5) 

*  0.01  *  8(1) 

DEPO i860 

101. 

GO  TO  10 

DEPO 1 880 

10?. 

0 

CONTINUE 

DFPO 1800 

103. 

00  01  N  s  1 

,nk 

DFP01810 

100. 

IF  (  N  TPD ( J 1 . 

EG . 0 )  GO  TO  10 

DEPO 1 8 1 1 

105. 

OEPR  (J.N) 

*  B(t )/NYPD(J) 

D£P018?0 

106. 

01 

CONTINUE 

DEPO 1 830 

107. 

DEPP  (J.l) 

*  0.5  *  DEPP  (J,l) 

DEP018U0 

108. 

N  S  NK  ♦  1 

DFPO 1850 

100. 

DEPP  (J.N) 

s  DEPR  (J,l) 

DEPO 1860 

?oo. 

10 

CONTINUE 

DEPO 1 970 

?01. 

RETURN 

DEPO 1 980 

?0?. 

END 

DEPO 1 980 

19 


Subroutine  ECO 

1. 


SUBROUTINE  ten  FCHOOOin 

C  ECOnooan 

e  »*»  T  *  I S  Sllhwnur  I\F  SUMMAPIZFS  AND  PR  T  NTS  OUT  ESTIMATED  FllTljRF  ANNUAL  ECPO0O30 

C  **»  CASH  fin»S  AND  PQFStNT  VALUE  OF  CASH  FLOWS  FOB  EACH  A L T F RN A T I VE , EC 0 0 0 0 U 0 

C  *»*  f  PART  1  of  OUTPUT).  Frnoooso 

c  Fcoooobn 

CnMMPN/A(_L/4F«C  (  in  1  ,  AHV*  (  10  )  ,  A*PUf  1  A  )  ,  AKFT  (10),  EC000070 

♦  RTIlBri0),niSBri0),FPTU(10),FATS(10>,  EC 000080 

♦  HWVU(IO) ,HRAF ( 111) ,HBRF ( 10), (VST ( 10) ,NYPS( tPJ.PVAT ( 10),PCT ( 10),  ECOOOQPO 

♦  BAVL(10),BECY(10),TAUx(10l,T»ESriO),rEPB(10,?0),  EC000100 

♦  NAL  T , NOP  1 ,NYR0(10)  EC000110 

COHMON/EC01/CSAL(10),IEXP(10),ITCB(10),  FC000120 

♦  TXBT  (1 0),«CR0( 1 0), ACST ( 10,?0) , ANCF ( 10,20) ,HNCF( 10,?0) ,  ECOOOIJO 

♦  VCST ( 10,20) ,FCST ( 1 0,20) ,Chhb( 1 0,20), AZER( 10) ,  ECOOOlaO 

♦  PAXF (1 0,20) ,BCST ( 1 0,20) ,BVAL( 10,20)  ,wCRA () 0,21  )  ,  F COO  0150 

♦  «C»T( 10,21 ),TITL (20, 10),  ECP00160 

PF AL  IVST,ITCR.  IEXP  FC000170 

r  EC000180 

IF  (MUP1.NF.1)  WRITE  (e,ll)  ECOOOIPO 

11  FORMAT  ('1','PAPT  I,  FINANCIAL  SUMMARIES')  FCI100200 

00  *  Jsl.NAl T  EC00021 0 

MYRS  s  NYRS(J)  EC00022O 

00  1  NxI,MYRS  EC  00  02  30 

C  ***  CALCULATE  annual  ROOO-Bark  FUEL  COSTS  EC000200 

BCST(J.N)  s  bvAL(J.M  »  TPES(J)  EC000250 

C  ***  CALCULATE  ANNUAL  ALT/AIIX  FUEL  COSTS  EC000260 

ACST(J.N)  s  PAxF  ( J  ,  N  )  •  T  All  x  ( J  )  EC000270 

C  ***  CALCULATE.  BEFORE  Tax  nF  T  EXPENSES  ANO  A  VO.  COST /MMBTIJ  EC000280 

8NCF  (J,N)s(  VCST(J,N)*FCST(.',N)'FRCST  (J,N)*ACST  (,I,N)*0EpR(.1,N)  )  ECO002P0 

CMMH(J,n)xBNCF(J,N)/BTUP(J)  EC 00 0300 

c  ***  Calculate  after  tax  net  cash  flow  ecooosio 

ANCF(J.N)  r  -(VC$T(J,n)  ♦  FCST(J.N)  ♦  EC000320 

♦  PCST(J.N)  ♦  ACST ( J,N) )  *  (1.0  -  TXPT(J))  ♦  OEPP(J.N)  *  T X R T ( .1 )  -  EC000330 

♦  BCBA(J,N)  ECOOOSao 

1  continue  EC000350 

ANCF ( J , 1 )  *  ANCF(J,1)  ♦  ITCR(J)  FC000360 

N  s  NYBS(J)  EC 000570 

ANCF(J.M)  s  ANCF(J.N)  ♦  FATS(J)  ♦  WCRT(J,N)  ECO005P0 

PCT(J)  s  PISP(.n  *  100.0  ECOOOOOO 

PVAT  (  J)X(-I  VST  (  J)  )-wCRl)(J)+CS*L  (J)“(UXP(J)*(  1 ,0-TXOT  f  .1)  )  )  ECO00«20 

AZER(J)*PvAT(J)  ECOOOaSO 

00  2  Ns  1 , hyps  ECOOOaao 

C  ***  Calculate  PRESFNT  VALUE  after  taxes  EC000a70 

PVAT(J)  s  PVAT(J)  ♦  ANCF(J,N)  /((1.0  ♦  D1$R(J))**N)  ECOOOaBO 

2  CONTINUE  ECOOoaRO 

C  EC000500 

c  **•  PRINTOUT  financial  summary  ECOOOS1 0 

IF  (N0P1.E0.1)  GO  TO  7  EC000520 

C  ***  hr  I TE  INVESTmfnt  COST  PARAMETERS  EC000530 

IF  (J.FO.l)  WRITF(6,333)  J  EC0005aO 

333  format ( '0 ',/// 'OFInanCI At  summary— ALTERNATIVE ' ,lx,I2/)  ECOOO550 

IF  (J.GT.J)  WRITE (6, 33)  J  EC000560 

33  format  ('1FINANCIAL  Summary  — ALTERNATIVE', lx, 12/)  EC000570 

wR  J  Tf  (<*»  3  )  (TITl(I,J),I«1 ,20),NYRS(J),FATS(J),IVST(J),TXPT(J),  EC000580 
♦IEXP( J),wCBQ( J) ,E«T||(J) ,CSAl(J) ,BTUP(J),AXFT (J)  FC0005PO 


♦  BCRA(J.N) 

1  CONTINUE 

ANCF(J.l)  s  ANC.F  (J,  1  )  ♦  ITCR(J) 

N  S  NYRS(J) 

ANCF(J.M)  s  ANCF(J.n)  ♦  F  AT  S ( J )  ♦  WCRT(J,N) 

pct(J)  s  oisp(.n  *  loo.o 


pct(J)  s  oisp(.n  *  loo.o 

PVAT  (  J)X(-I  VST  !  J)  )-r«CRl)(J)+CS*L  (J)»(UXP(J)*(  1 ,0-TXOT  f  .1)  )  ) 
AZER(J)sPvAT(J) 

00  2  N s 1 ,myPS 

c  ***  CALCULATE  PRESFNT  value  AFTER  taxes 

PVAT(J)  s  PVAT(J)  ♦  ANCE(J,N)  /((1.0  ♦  D1$R(J))**N) 

2  CONTINUE 


c  **•  PRINTOUT  FINANCIAL  summary  ECOOOSIO 

IF  (N0P1.E0.1)  GO  TO  7  EC000520 

c  ***  WRITE  INVESTMFNT  COST  PARAMETERS  EC000530 

IF  (J.FO.l)  WR I TF ( 6 , 333)  J  EC0005aO 

333  FORMAT ( '0 ',/// 'OFINANCI Al  SiJMMA R Y-- ALT! RN A T I VE ' , 1 X , I  2/ )  ECOOO550 

IF  (J.GT.J)  WRITE (6  * 33)  J  EC000560 

33  format  ('1FINANCIAL  Summary— ALTERNATIVE', lx, 12/)  EC000570 

MR JTf<(»,3)  (TITl(I,J),I«1 ,20),NYRS(J),FATS(J),IVST(J),TXPT(J),  EC000580 
♦!EXP(J),MCRO( J),EPTII(J),CSAl( j),BTUP(J)»*XFT (J)  FC0005BO 

3  FORMAT! *  ' ,20Aa//l X ,  ' INVFSTMFNT  PARAMETERS  (YEAR  0)!  ',BX,  'ENDING  NECOOObOO 

♦  ET  SALVAGE  (YEAR  ’ ,  12,  '  )  *  '  ,F1  0 .0/  2X  ,  '  DE  PRE  C I  ABL  E  ASSETS  -  -  -  S',ECOOOblO 

♦  Ft0.0,2x, 'EFFECTIVE  ANNUAL  TAX  PATE  -  -  -  -  •  , Fb . 3/2 X , ' NONDEPRE C .  EE  COO  0b20 
♦XPENSES-  -  -  Y',F10.0,2X, 'HEAT  ENFRGY  PFGUIPEMENTS  ANO  OUTPUT:'/  EC000630 

♦  2X, 'WORKING  CAPITAL-  -  -  -  -  f  ',FI0.0,3X,'FSSENTIAL  REO.  -  -  * ,F  1  OECOOObao 

♦.o,ix,'“mbtu/yp.'/2x,'old  facility  nft  salv.  -  *',fio.o,jx, 'total  ecooobso 

♦  OUTPUT  -  -  -  '  ,  F  1  0 . 0  ,  '  MMBTll/YR. '///IX, 'ANNUAL  COSTS,  DEPRE  C  I  *  T  I  OnF.CO  0  0  660 

♦  ANO  AVERAGE  ANNUAL'/?*, 'COST  PER  MMBTU  OF  TOTAL  ENERGY  OUTPUTS ' //EC000670 

♦  1 7 X ,  'FUEL  C OS TS'»9X, 'OTHER  VAR.',ax,’FTXEO',7x,'OEPRE-',5X,'CnST/’ECnO067  1 
♦/I IX, 'MOOO-RAPK ' ,6X, Aa,«x, 'COSTS' ,7X, 'COSTS' ,7X,'CTATI0N',UX, ' mmBTE C000b72 

♦  U'/lSX,a(  •  »*  ,  1  lx),  '.t'  ,  1  IX,  '*•  )  EC 00 06  7  3 

c  *•*  WRITE  ANNUAL  CASH  FLOWS  ANO  DEPRECIATION  EC000730 

no  aa  nxi,myRS  EC0007ao 

WRITF (b,a)  (N,PCST(J,N),ACST(J,N),VCST ( J , N ) ,FCST ( J, N ) , OEPR ( J , N ) ,  FC000750 

♦CmmB ( J , n ) )  FC000760 


73. 

7a. 

75.  C  *' 

76.  C  •' 

77. 

7**. 

7«. 

SO. 
fit  . 

*2. 

PS. 

ss. 

PS. 

S  6  . 

ST. 

PB. 

so.  ( 

o  0 .  c 
01  . 

B2. 

RS. 

o«. 

OS. 

B6. 

07. 

Subroutine  E01 


nil  CONTIMJF  E  C  DO  0  7  7  0 

<J  F0OM4TC  '  .  1  «  ,  'YE  AO  '  .  I  *  .  I2,S(2X,F  1(1.0)  ,?X  ,EP.?)  FCP007SO 

..  ~  sr  I  T  F  nF  T  CASH  FLO*S.  INVESTMENT  T  a  )i  CREDIT  (FND  pf  vfab  VALUES).  FC0O07O0 
•*  ECOOOBOP 

HsiTFfo.o)  (ifxb  ( ji ,  A^Eof.n  ,sncf  (.i,  n ,  ttcc  ( ji  ,»coa  (.i,  n ,  ahcf(  j.  n  iFcnoosi  o 

S  FQOHA  T  (  '  0  '  /  1  X  ,  '  PFFOOf  TAX  NET  fxRENSFS,  INVESTMf  NT  TAX  CREDIT,  A  DDE  C  0  0  0  S  ?  0 
♦  ITIOHAL  INVESTMENT  (  w()R*  (NO  •  /?x  ,  *c  AP  I  T  AL  1  AND  AF  T  F  0  TAX  NF  T  CASH  EECOOOB21 


♦  lo  including  salvage  (fmj  of  vfar  values):'// 

♦  1 6X  ,  '  BFEPkE  TAX  '  »e<  i  '  T  A  i  1  ib<  (  'ADDITIONAL  '  ,  6  X  ,  'AFTER 


Ernnos?? 

Ernoos.Lo 


tXPFNSFS'.ax,'C«FDIT',UX,'I»!vFST“FNT','JX,'NFT  CASH  Fin>-'/FrnOO«UO 


♦  ?lx.'»',tix,'«',nx,'F'.isx.'s'/ 

♦  lx, • yf  a b  o • , 6X ,r I2.0,27x ,f i 2.0/ 

♦  1  x  ,  •  YE  A»  l',6X,Fl2.0,PU.(i,2x,F1t.n,Jx,F12.0) 

OP  SS  Ns?, hyps 

«R I tf (6, 6o1  (n.pnCF (J,n),*CBA(J.ni,anCF (J»n)  1 
SS  CONTINUE 

66  FOOHAT(lX,'YE4O',l«,T?,6«,F1?.(l,MX,M1.0.FX,Fl?.0 

•  •  hhttf  pbf  sE  n  t  value  nr  cash  flp«s 
*01 TF (6,6)  PVAT ( J) .PCT ( J) 

6  F  II  R“AT('0'/lX,  'PRESENT  V  A  1 1  f  (  V  F  A  C  0)  PF  AFTER  TAX 


FCOOOSSO 
E  f P006S 1 
FCOOO«6II 
F  C000P70 
Frnoopflo 

FC000OO0 

fcoooooo 
E  c  0  0  0  O  i  o 

FCGOOojn 

nFt  cash  Fi.n*S:ECrooojo 


♦  '  //6X  ,  •  «  '  ,F  1 0.0,2X  , 
7  CONTINUE 

«  Continue 

0£  TlIBN 

end 

S  IHOOUT INf  EU1  ( A , H 1 


1X.FU.1 , 


p  F  B  C  E  N  T  ANNUAL  DISCOUNT  BATE') 


>»  This  SllHBOU  T  I  NE  EOUATFS  TF  N-F  lF  HfNT  ABBAYS  -  ARGUTE  N  T  S 

n  i  hens  I  un  a  noi,B(io) 

DP  1  jsl.to 
A  (  J  )  s  R  (  .1  ) 

1  Cuntinuf 

SE  TURN 
END 


Subroutine  HTR 
1 . 


s IJ P « 0 U T  I  N F  HTR 

THIS  SUBROUTINE  CALCULATES  APPROXIMATE  AVG.  HEAT  BFCOVFwy  FRO* 
ROOD  OR  hark  FUELS,  IN  HTlJ  PER  POUND  '  wf  T  '  (AS  FIRED)  BASED 
ON  Input  DATA  AND  ASSUMPTIONS. 

COMMPN/ALL/AFMC ( 10) , AHHV ( 10) , AhRLK  10) , AXFT ( 10) , 

►  HTUR(1O),DISB(10),FHTu(10),FATS(10), 

►  HMVUf 10) ,HBAF ( 10) ,HBPF ( I  0) , I  VST ( 10) ,NYRS( 10) ,PVAT ( 1 0) ,PCT ( 1 0) , 

►  PAVL(1O),RErv(lO),TAIIX(1.1),TRFS(lO),OEPMflO,?0), 

►  NA1  T , NOP  1  , NYRP (10) 

COmhON/hTPI/aCHL(10),AFaF(10),ASGT(10),ATCA(10), 

►  ATRF(10),AVCC(10T,AVHC(10), AVNC ( 1 0) , A VDC (1 0) , 

►  CONV ( 1 0) , SGHP ( 1 0) ,SGHW ( 1 o ) , 


00  1  J  r  1,  NALT  HTR00160 

»*»  CALCULATE  MEAT  ENERGY  »F»  'wFT*  POUND  OF  FUEL  HTR00170 

•*»  CALCULATE  STACK  GAS-hfaT  LOSS  CAUSFD  BY  FUEL  moisture  AND  WATER  HTROOIPO 

***  F R 0 h  HYOROGFN  CD“HUSTIOn  HTR00190 

SGHw ( J ) a  (970.0  ♦  (212.0  -  ATbF(J))  ♦  (0.U6  *  (ASGT(J)  -  212.0)))  MTP00200 

♦  ♦  (AFMC(J)  ♦  9.0  .  AVHC(.J)  ♦  (1.0  -  AFMC(J)))  MTR0021  0 

♦♦»  CALCULATE  STAC"  GAS  hFAt  LOSS  CAUSED  BY  DRY  GAS  AND  FxCFSS  AIR  HTRO0220 

SGHD(J)  *  (  A  SGT  (  J  )  -  A  TC  A  (  .1  )  )  ♦  (1.0  -  AFMC(J))  •  (0.?U  *  (  (  (  A  VhC  (  »  T  R  0  0  2  5  0 

♦  J)  ♦  B.O)  ♦  AVCC(J)  •  2.667  -  AV0C(J)1  /  0.?32)  .  A  E  A  F  (  J  )  ♦  (  ( (  ( A v H T R 0 0 ? U 0 

♦  h  C  (  J  )  ♦  B  .  0 )  ♦  A  V  C  C ( J )  ♦  2.667  -  AVCC(J))  /  0.?32)  ♦  P.76B  ♦  A  V N C ( h T R 0 0 2S 0 


Ff OOORuO 
ECOO09B0 
F (000990 
FCC0100O 
Ecooimo 

F  (3  1  0  0  0  1  0 
F  0 1 00020 
EDI  000 30 
E  0 1 0  0  Ou  0 
f  q i oonso 
E  o  i  o  o  0  6  o 
FQ100070 
E  G 1  0  0  0  «  0 
F  1)1  O0O9I1 
F  0  1  0  0  1  0  0 
F  0  1  0  0  1  1  0 

HTRO0O 1 0 
HTR00020 
HTRP0030 
MTROOOaO 
HTROOOSO 
HTR  0  0060 
MTR00070 
HTROOOSO 
HTRO0O9O 
HTROO 1 00 
HTROO 1 l 0 
HTR0012O 
HTR001 30 
HTR001UO 
HTROO ISO 
HTROO 1 60 
HTROO 1 70 
HTROOIPO 

HTROO 1 90 
MTP00200 
M  T  R  0  0  2  l  0 
HTRO0220 


♦  J))  ♦  0.25  ♦  AVCC(.I)  ♦  3.667  ♦  0.22) 

>  CALCULATE  'CONVENTIONAL •  Hf at  LOSSFS  1 

CONV(J)  X  AHHV(J)  ♦  (1.0  -  AFMC  (J))  i 

>  CALCULATE  HEAT  RECDVF9Y  -  RTU  /.  POUND 
RECY(J)  x  AHMV(J)  ♦  (1.0  -  AFMC(Jl)  - 
IE ( RE CY(J).lE. 0.0001)  RFCy(J)xO.00O1 

I  CONTINUE 
return 
End 


MTR0026U 

(RADIATION,  CONVECUPN,  etc  .  )mtR00270 

♦  AC  ML ( J )  HTROO?HO 


'WEI*  wood  ( R  BARK  FUEL 


HTR002°I) 


(SGHW(J)  ♦  SC.HO(J)A  CONV  (  J)  )HTR003011 

HTROO  < 1 0 
HTROO 320 
HTROO 330 
HTR003UO 


Subroutine  PHY 


1 . 

2. 
3. 
«. 

5. 

6. 
7. 
«. 
<7. 

10. 
1  1  . 
1?. 
IS. 
19. 

15. 

16. 
17. 
1«. 

19. 

20. 
2 1 . 
22. 
2  S . 
2o. 

25. 

26. 
27. 
2«. 
2«. 
SO. 
51  . 
52. 
55. 
3o. 

35. 

36. 

37. 
3«. 
36. 
00. 
01  . 
02. 
03. 
00. 
05. 
06. 
07. 
00. 
06. 
50. 
51  . 

52. 

53. 
50. 

55. 

56. 

57. 
5«. 
56. 
60. 
61  . 
62. 
63. 
60  . 

65. 
6b  . 
67. 
6«. 

66. 

70. 

71. 

72. 


C 

C  *** 
C  *** 
C  **« 
C  *** 
c  *  *  * 


SIJBPDUTIM  PHY 

THIS  SUBROUTINE  CONSOLIDATES  AM'  PPIMTS  OUT  OATA  RELATFO  TO  TmF 

physical  parameters  (fuel  volume  requirements,  hfating  value, 

HEIGHT,  MOISTURE  CONTENT)  AMO  WK  A  T  ENERGY  RE  Ql '  I  RE  ME  N  T  S--E I  IE  L 
SUR°l T  HAL  ANf t ,  I N  BRITISH  AMO  SI  (I^ITS  (SY$TF“F  INTERNATIONAL 
D'l/NITE  S) 

COMMON /ALL/AFHC (101, AHH  V ( 1  01  ,  AWhllf  t  0)  ,  AXFT  (  1  0)  , 

♦  RTIJO  (  1  0)  .0  JSR  (  1  0  )  ,F°TIJM  0)  ,FATS(  10), 

♦  HHVII  (  1  0)  ,H»AF  (  1  0  ),H»RF  (  10)  ,  I  VST  fl  0)  ,AiYRS  (  1  0)  ,PVA  T  (  1  0)  ,PCT  (  10)  , 

♦  PAVL ( 10) ,HFCV ( 1 0) ,TAUx ( 1 0) ,TPES( 1 0) ,DFP6 ( 1 0,20) , 

♦  MAI  T  ,  M  0  F’  1  ,  NVPQ  (10) 

COM«nM/PMYl /AOTUC1 0) , AFSU(IO) , AFHPf 10) , ASSI (101 , 

♦  PCTAC  1  0)  ,P'CTP(  1  0)  ,PHTU(  1  0)  ,»COD(  10),POSI  (  1  0)  , 

♦  PFSl  f  10)  ,PPS2( 10)  ,PHSI ( 10),PSSI MO) ,SBTU( 10), 

DIMENSION  DwMC(lO) 


C 

C  *** 
C  *♦* 

c  *  *  * 
c  *** 
c  *** 
c  *** 
c  *** 
c  *  *  * 

c  *  *  * 
c  ♦  *« 
r  *♦« 

c  ♦  ♦♦ 
c  **♦ 

l 

c  *** 

1 1 


-niSTUPE  content 
AFhc  IJ)  ) 

P.Y  *000  OR  bark 


2 

22 

23 

33 

3 

C  *♦♦ 

oo 


0(1  1  Jsl.NALT 
CALCIILATF  OOY  HEIGHT 
DwmC(J)  =  AF“C(J)/(1.0 

CALCULATE  mmrtu  SUPPLIED  P.Y  WOOD  DR  BARK  FUEL 
WHT  jr  J)  sTFES  (.1)  *Mppc  (  J) 

CALCULATE  MMBTU  SUPPL  I  £0  BY  AUX-Al.T  FIJfL 
ABTU(J)  =  TAUX(J)*hp»F(.I1 

CALCULATE  PTI.  TOTAL  hfaT  SUPPLIED  BY  WOOD  OR  RAPK  FIJFL 
PCTRfJ)  =  (BBT|i(J)/(PRT|l(J)*ARTlJ(J)))»100.0 
CALCULATE  pci.  total  hfaT  SllPPLlFO  BY  AUX/41T  FUEL 
PCTA(J)S(ABTII(.))/(PRT||(J)*ABTIJ(.I)))*100.0 

CALCULATE  AVG.  aS-FIMEO  hF.IGHT  of  WOOD  or  bark  FIJEL/SaLFS  UNIT 

AFhR(J)sA*PU(J)/(1 .O-AFMC(J)) 

CALCL'LATfc  CE  COVE  PARI  F  heat  in  RTU'S  PFP  OVEndry  POUND 
HCnOC  TJsRFC  Y  (.!)/(  1.0- A  EMC  (J)) 

CALCULATE  RECOVERABLE  HFAT  IN  K JOULES/KG.  AS-FIRED 
PHSI  <  J)=RLCY(.T)*2.327B 
POST  f.I)=PCPnrj)*2.327R 
CALCULATE  RECOVERABLE  heat  IN 
CALCULATE  RECOVERABLE  HEAT  IK 
SALFS  UNIT 

PSS I ( J ) shRRF (Il*2.327fl 
CALCIILATF  PECnvFPABLE  HEAT 
SALFS  UNIT 

ASSI (J)shraF (J)*2.3276 
CONTINUE 

TABLE  1  OUTPUT  AND  FORMAT 
HRITE  (6,11) 

FOPHAT ( ' 1 ' , 'PART  III.  DESCRIPTION  OF  ENgPGY 

♦  ETE PS ' >\ 1 x ,  'FOR  F  ACM  ALTERNATIVE  (TARIFS  1 
♦HFAT  ENERGY  RALANCF  AND  FUFL  REQUIREMENTS  (ANNUAL  BASIS)', 

♦  //6X, 'ESSENTIAL  ENERGY ', 3X , 'SUPPlUS  E NERG V  '  , a  X ,  '  TOT au  E  NFRGY ' , 

♦  /llx, 'PFOU  IRE  “F  NTS', 6X, 'PE  QUIRE.  ME  NTS', SX,  'OUTPUT  '  /I  3X  , 

♦  '  (MMRTCI)  '  ,  1  1  X  ,  '  (MMBTU)  '  ,  10X,  •  (MMBTU)  '/) 

HRITE (6,2)  (J,FRTU(J),SBTII(J),BTUR(J),J=1,NALT) 

F OP M A T (  '  ALT'  ,I2,lX,F16.fl,2x,Flb.O, IX, F 16,0) 

WRITE (6,22) 

FOR“AT ( *0 ' /7X ,' ENEPGY  SUPPLIED  BY *, 1 1 x , 'ENERGY  SUPPLIED  By  OTHER 

♦  R' /«X, 'WOOD-BAPK  FUEL ' *3X, • (PCT.  OF  •  ,  6X ,  '  AUX I L T ARY  FUEL'»3X, 
♦'(RCT.  OF' /10X,'( MMBTU)', SX, 'TOTAL)', 12X,'(mhrtu)',6X, 'TOTAL)'/) 

WRITE (6, 23)  (J,P«TU(J)  ,PCTP( J) , A0TLK  J) ,PCTA (J) , jsl ,nALT) 

FORMAT! '  ALT',I2,Flb.n,UX,E5.1,OX,Flb.0,6«,FS.l) 
h  R I T  F  (6,33) 

Fpp«AT(  'O’/lOX,  'QUANTITY  OF • , 6 X , • h OOQ -M A PK  F  IJ  £ L '  , P X ,  ' 0 T H£ P  FUEL'/ 

♦  7  X , ' HOOD-BARK  AVAILABLE ' ,SX, 'PEQUIRf MfcNTS ' ,6X , 'REQiJIPEME  NTS ' /) 
hPI IF (6,3)  ( J,RAVI (,1)  ,RFS1 ( J) ,PFS2(J) ,TPES(J1 ,PFS1 (J) ,RFS2( J) , 

♦  TAUX ( J ), AF  SUf J) ,AxFT ( J) , J=1 ,NALT ) 

POP- AT ( '  ALl',I2,2X,F10.n,lx,2AO,F12.0,lX,2AO,Fl2.0,lX,AO,lX,'{', 

♦  AO ,  '  )  •  ) 

TABLF  2  OUTPUT  AND  FOB-M 

WRITE  (6,00) 

FORMAT  (•  (1  >//?*,•  TaBI  F  P.-.hOOO-BAPK  Fuel  PAPAMETEPS  and  ESTIMATED 

♦  hfaT  PE  cove RY • //6X , ' OVE NORY  hT  ( L B S  )  '  , 3 X ,  '  MC I S HIRE  CONT  .  '  ,5x  , 'Mfc T 


6  JOULE  S/KG  .  OVF.MDRY 

BILLION  JOULES  PEP  PESIDUE  FUEL 


IN  Ei  I LL  I  ON  JOULES  PFR  AUX-ALT  FUEL 


BALANCE  AND  FUEL 
TO  0)  '//2X,  'TABLE 


PhYOOO  1 0 
PH YOU  0  20 
PHY 0  00  30 

PHYOOOOO 

PHY  00050 
PHY00060 
PHY0007O 
PHYCOOBO 
PHY00060 
RHYOO 100 
PHYO01  1  0 
PHY00120 

PHY001 JO 
PHYOO 1 00 
PHYdO 1  SO 
PHY001 60 
PHY  00 170 
PHYOOIBO 
DHY00160 
phy  00200 
PHY00210 
PHY00220 
PHY  0  02  3  U 
PHY002O0 
PHY002SO 
PHYP0260 
PHY00270 
PHY  0  02B  0 
PHY00290 
PHY00300 
PHY00310 
phy  yo  320 
PHY00330 
PHY00300 
PHYOO  350 
PHY  0  0  360 
PHY00370 
PHroo3BO 
PHY0036P 
PHYOOOOO 
PHYOOO) 0 
PHY  00020 
PHY  0  0  0  30 
PHYOOOOO 
PHY00O50 
PHY00O60 
PARAMPHY00070 
1 .--PHYOOOflO 
PHYOOU60 
PHY00500 
PHY  005 1 0 
PHY  00520 
PHY00530 
PHY  0  0500 
PHY00550 
0  PHY  0  056  0 
PHY00570 
PHY00SB6 
PHY  00590 
PHY00600 
PHY00610 
PHY00620 
PHY00630 
PHY00600 
PHY  0  0650 
PHY00660 
PHY 0067  0 
PHYOObBO 

phy 00690 

PWY00700 
PHYO  07 1 0 


♦  Hi  (l  BS) ' ,ax, '“OISTURE  CONT. '/7X,  'PFR  SALES  UNIT  '  ,ax,  •  (DPY  hT  MASIPHY00720 


!2 


73. 

7u. 

75. 

76.  'J 

77. 

7H. 

75.  55 

80. 

81. 

83. 

83. 

8U. 

85.  S 

8*i.  C  **• 

87. 

8a.  66 

85. 

50. 

51  . 

5?.  h 

53. 

5U.  77 

55. 

56. 

57. 

58. 

55. 

100. 

10  1  . 

10?. 

103.  7 

1  Ou  . 

105.  5 

106. 

107. 

Subroutine  RAN 
1 . 

?.  c 

3.  C  **• 

o  .  C  *  *  * 


♦S)',ux,’PEF  SAIFS  UNIT  '  ,  3X,  '  fwf  T  *T  BASTS)'/)  Pwy0073O 

wPITf  (6,U)  T  ,),  4  "(Ml  I  f  J  )  ,  PFS1  (.1)  ,OFS?f  J  )  ,DKMC  (  J)  ,  AF-E  (  J  )  ,BFS1  (  J  1  ,  PHYO  0750 

♦RFS2T  .1)  ,  AT  MC  T .1)  ,.l=1  ,NAL  T  )  PHY0075O 

I  F0»«ATC  AL  T  *  ,  72, 2X  •  /  •  ,<?AU,*X,FU.?,«x,F6.0,  •  /•  8X  ,F  0.3)  PHY00760 

Phy 00770 

-RITE  (6.55)  PHY00780 

;  POPMX  T  (  •  0  •  /b*  ,  'HIGHER  HFAT  VALUE  1  »  '  -----  fSnMATFn  MEAT  F  NE  BbPnY  00750 

♦  Y  PFCDVf PY ' , 5 T '  -')/  PH  Y  008  0  0 

♦  8  X  ,  1  (8TII/PPY  LH)  '  ,UX,  •  (8TII/DPY  l  P  )  '  ,  ?  X  ,  '  (  B  T  U  /*  P  T  I  B  )  '  ,  6  X  ,  '  (  “•'R  T  '  /  SPh  Y  00  H  1  0 

♦  ALPS  INI T  )  '/)  PHYOQ820 

"P  ITT  (6.5)  (J,  AHHV  T.J)  ,»C06T.l)  ,Pf  CY  (J)  ,HPPF  (J)  ,RFSt  (  J)  .RFS2T  J)  ,  PHY  0  0030 

♦Jsl.NAlT)  PhY00«U0 

i  F|1P*'AT('  AL  T  • ,  I?,6X  1  o*,r(,.0,8x,F6.0,ax,F  12. 3,  '  /  •  ,?a<4)  PHYO0M50 

-  TAR(F$  3  A  Mil  U  n(IT°HT  A  >|H  F  OP M  A  T  Pmy00»60 

6  P I  T  F  (6,66)  PHY00870 

i  F(P*'AT  (<{</////  ?  X  ,  '  T  A6(  F  3.--OTHFP  OP  AUXlLIAPY,  EljEl  P  AR  A  up  Oh  y  0  0  K«  0 

♦  TFPS' //7X,  '  TYPF  OF  '  ,  3X  ,  •  HIGPf  P  HFAT  VAIUF',3*,  PHYOOR90 

♦'ESTIMATE  0  MfAT  RECOVERY  •  /  MX.  '  F  uf  l  •,10x,'(MP8TU)'.17X,'(,'MhTU)'//)PHY0050l> 

"R  I  I  F  (6,6)  (  1.  AXF  T  T  1)  .HMvUTJ  1  ,  AFSU(J)  ,HPAF  (J)  ,  AFSIK  J)  ,  J=t  ,NA1  T  )  PHY00510 

,  FORMAT  f<  ALT  '  ,!?,?< ,AU ,6X ,F8. ?,*/•, AU,  1 ?X ,F8.?,  </  l  ,  AU  )  PHYO0°?O 

"RITE  (6,77)  PHY  00530 

’  FIJP^AT  (•()  •///?»,' TAALF  P.--INTFPA  ATlOFAl  SYSTFM  (SI)  UNIT  R  F  C  D  VF  PPH  Y  0  J5  a  U 

♦  AM  l  HFAT  ENERGY  ESTIMATES'//  PHY00550 

+  5  X  ,  6  (  1  -  •), 'ENERGY  IN  *OPP-BAFK  FUFL'.RT'  -'),'I7THFP  FUEL  -  -'/  PHYOQ560 

♦  1  OX,  '  T*  JOULE.  /*G  ',6«,  1  O' JOULE /KG  •  ,oX  ,  •  (p  ILL  ION  jihii  E'.6X,* (BILLION  PHY0057O 

♦  jni'LF  '  /  PHY  0  0  5  8  0 

♦  lOX.'OPY  PASIS)  '  ,6X,  'WFT  5 ASTS  )  '  , 6X ,  '  Pf  P  SAIFS  U H T T  )  *  , 5 X  ,  '  F F p  SALEPHYO055O 

♦S  UNIT ) ' / )  PHYO 1 000 

6  P  I  T  F  (6,71  (  J.PDSI  (  1)  ,PMSI  TJ)  ,PSSI  (J)  ,PF  si  (.1)  ,OFS?(..n  .  ASST  {  J  )  ,  PHYOIOIO 

♦AFSUT J), J  =  1  ,UAl  T )  PhY01U?0 

’  FllR"AT(»  ALT  '  ,  Ii,OX  ,FH.O,  SX,F».0,ax,F5. 1  ,  '/ •  ,2A0,5*  ,F5. 1  ,  '  /  '  ,  AU)  PhY  0  1  0  30 
xPTTF  (6,8)  P  H  Y  0 1 0  u  0 

l  FORMAT T • 1 • , 'END  (IF  OUTPUT')  PMY01050 

OFTlJPN  PH  Y  0  1  0  6  0 

£*)P  P H  Y  0  l  0  7 0 


Subroutine  RD1 
1 . 

2.  C 

3.  C  *** 

fl.  C  *** 

5.  C  *** 


Si  IR  ROUT  IMF  PAN(f)  A  T,  NRK  ,  VAl  T  ) 

THIS  SUBROUTINE  RANKS  FLF^FNTS  JN  ThF  APPAY  (OAT)  RY  UU“E  c  I  C  *1 
"  AC-N I  T  UPF  ,  A  NO  C°FATES  ThF  INTEGER  APPAY  (NPX)  Al'IC*  IS  ThF  UPPER 
OF  V  AON  1  T 1 1DF  OF  EI.FmFNTS 

01  Hf  NSIl’.N  OA  T  (  1  0  )  ,MDK  (  t  0)  ,0A  1  A  (  1  0  ) 

CALL  EDI  I  PATA.DAT) 

NP" T 1 ) = 1 
Xx:  1 

DO  2  J s 1 , N  A  l  T 

00  1  k=i,nalt 

IF  TPATATK).C*T  .OATA(»K))  NRK  T,1  )=k 
IF  TpA TA (K ) .GT .PAT  A (kk ) )  XX:X 
COM  INIJL 

DATaTxh  ):T*1O.ii)*T1o.0**?o.0) 

CUM  I  NUF 
P  F'  T 1 1 P  N 

EnU 


SUBROUTINE  ROl  (V.NYRS.NALT) 


THIS  SUBROUTINF  RF  AOS  ANNUAL  CASH  FLO"  AND  PRICE  INPUT  PATA. 
ANNUAL  ESTIMATES  hay  HE  READ  in,  or  ALTERNATIVELY  THE  FIPST 
year  ESTIMATF  PLUS  annual  RATE  OF  I NCRF ASE  "ILL  BE  READ  IN. 

DIMENSION  V(10,20),NYRS(10) 

on  3  J*1 ,N*LT 

«t  s  0.0 

READ  (5,u)  (V(J,N) ,NS) , 10) 

IFTVTJ,2).IT.1.0.AND.V(J,2).GT.0.00001)  PI  :  V(J,2) 

IFTVTJ,  2).  LT.  1  .O.ANO.vt  1,2).  C.T.O.OPOOl  )  GO  TO  1 


R  A  N  0  0  o  1  I) 
RANT)  0  020 
RANOOO  30 
PANOOOOO 
PAN 00050 
RAN00060 
R  A  N  0  0  0  7  0 
P  A  N  ()  0  0  8  0 
PAN00050 
R  A  N  0  0  1  0  0 
PANOO 1 1 U 
PAN00120 
R  A  N 0 0  1  30 
R  A  N  0  0  1  a  0 
P  A  N  0  0  j  0 
RAN001 60 

PAN001 70 

P  A  N  0  0  1  8  0 
PANOO 1 50 
PANOO?  (10 


R0100010 
00100020 
ROl 00030 

Rn  i  coouo 
RD1 00050 
RP100060 
RD1 0007C 
RD1 00080 
RD100090 
0P1 00 1 00 
PP100I 10 
PD  1 00 1 20 
PC  1  00  1  30 


23 


19. 

IF  (NYRS(J) .LE . 1 0 )  GD  TO  3 

RD 1 0  0 1 u  0 

15. 

READ  (5,9)  (V(J,N)  ,’,ti  t,20) 

RD  1  0  0 1 5  0 

16. 

IF  (  v  (  J,2) .GF . 1 . O.DR . V ( J ,2) .LE .0.0)  GO  TO  3 

RO 1 00 1 60 

17. 

1 

CONTINUE 

RD100170 

15. 

NY  s  NYBS(J) 

R01 00150 

19. 

DO  2  N=2,EY 

RD100190 

20. 

K  s  N  -  1 

RD1 00200 

21  . 

V ( J  ,  N  )  s  V ( J , K )  *  (1.0  ♦  01) 

RD  1  0  02 1  0 

22. 

2 

CONTINUE 

RD 1 00220 

23. 

3 

CONTINUE 

RO 1  002  30 

29. 

9 

FORMAT ( 1 OFP ) 

R01 00290 

25. 

RETURN 

RD1 00250 

26. 

Subroutine  REQ 

END 

R  1)1  00260 

1  . 

subroutine  rfo 

Rfc  G  0  0  0  1  0 

2. 

C 

RFQ00020 

3. 

C  *•* 

THIS  SUBROUTINE.  CALCULATES  hEaT  RECOVERY  and  V0LUMF  REQUIREMENTS 

REQO0030 

9. 

c  *  *  * 

FUR  HOOD  OR  PARK  ANO  AUXILIARY  HR  ALTERNATE  FUELS  PF R  SALES  UN  I T WE  ()  0 0 0 9 0 

5. 

c 

REQ00050 

6. 

COMMON/  ALl  /AEMC  (  1  0  )  ,  AHHV  (1  0)  ,  ArBIJI  1  0)  ,  AXET  (  1  0)  , 

RE  OOOO611 

7. 

♦  BTUR(l0),DISRflO),EBT(l(lO),EATS(lO), 

REQ00070 

5. 

♦  HHVL'(  1  0)  ,HRAF  (  1  0)  ,HBRF  (  1  0  )  ,  IVST  ( 1  0)  ,NYPS  (  1  0)  ,PV4T  (  10  )  ,PCT  (  1  0)  , 

REQ 00090 

9. 

♦  R  A  V L  f  1 0  ) » R E  C  Y  ( 1  B  ) »  T  A y  x  ( 1  0 ) ,  T Pfr"  S  ( 1  0 )  ,  PF P R  ( 1  0 , 2 0  ) , 

BFQ00090 

10. 

♦  NALT,N0P1 ,NYRD( 10) 

PEQOO 1 00 

1  1  . 

COmmon/req 1 /AF  BA ( 1 0 ) ,CHRF  (  1  0  )  , 

REQ001 1 0 

12. 

DO  1  Jsl,NALT 

RE 000120 

13. 

c  *  *  * 

CALCULATE  heat  RFCOvFRY  In  mIIlIOm  btij  pFP  SALES  UNIT 

R  E  Q  0  0  1  3  0 

19. 

c  » *  » 

ROOD  UR  BARK  fuel 

RE  Q  0  0 1 9  0 

15. 

HBPFfJ)  =  (ARRII(J)  /  (1.0  -  AFMC(J))  «  RFCY(.J)  /  (10. 0**6)  ) 

REQ0015P 

16. 

c  »** 

CALCULATE  HEAT  RECOVERY  IN  mILITON  RTU  PER  SALES  /  VALUE  UNIT 

REQ00160 

17. 

c  »*» 

AUXILARY  UR  ALTERNATE  FijEL 

REQ00170 

16. 

HRAE(J)  =  HHVll(J)  *  CHBt(J) 

REQOO 1 90 

19. 

c  **« 

CALCULATE  TOT  A  l  sales  UMTS  OF  rDOO  OR  PARK  FUEL  REQUIRED 

R  E  Q  0  0  1  9  0 

20. 

T  B  F  S  (  J  )  =  RTMR(.J)  *  AEBA(J)  /  HP  RF  (  J  ) 

REQ00200 

21  . 

c  *  ** 

CALCULATE  TOTAL.  SALES  UNITS  OF  AUXILIARY  OR  ALT.  FUEL  REQUIRED 

PEQ00210 

22. 

TALIX(J)  s  BTUP(J)  *  (1.0  -  AFBA(Jl)  /  HRAE(J) 

REQ00220 

23. 

IF  (  IRES  (I)  .C.T.RA  VL  (J)  )  TAUX(J)  s  TAUX(J)  *  (TRES(.l)  -  RAVL(J))  * 

h®E 000230 

29. 

*RPF ( J 1  /  HPAE(J) 

PE000290 

25. 

IF  (TRES(J)  .GT.RAVL,  (J))  TBES(J)  s  RAVL(J) 

REQ00250 

26. 

1 

continue 

PEQ00260 

27. 

return 

REQ00270 

25. 

END 

REQ00280 

Subroutine  RNK 
1 . 


2. 

3. 

9. 

5. 

6. 
7. 
5. 
0. 

10. 

11. 

12. 

13. 
i«. 

15. 

16. 
17. 
15. 

19. 

20. 
21  . 
22. 
23. 
29. 

25. 

26. 
27 . 
25. 
29. 


*  *  * 
*  *  * 
*  *  * 


SUBROUTINE  RNK 

TMJS  SUBROUTINE  RiNkS  ECONOMIC  ALTERNATIVES  ACCORDING  TO  HIGHEST 
BENEFIT  COST  PATIO  OF  ESSENTIAL  (PROCESS)  HEAT  »E QU I R E HE  NT S 
ANO  HIGHEST  BENEFIT  COST  RATIO  OF  TOTAL  HEAT  REQUIREMENTS. 

REAL  IVST.IEXP 

COMMON/ALL /a E«c ( 1 o) , AHHV ( 1 o ) , AWRU( 1 0) , AXFT ( 1 0) , 

+  BTUR(10),DISM10),EBTU(10),FATS(10), 

♦  HHVU( 1 0) ,HPAE (1 0) ,HRPF ( 1 0) ,1VST(10) ,NYRS( 10) ,PV AT (1 0) ,PCT  (1 0)  , 

♦  RAVL(10),BFCY(10),TAUX(10),TRES(10),DFP»(10,20), 

♦  NAL  T , NOR  1 , NYRO ( 1 0  ) 

CO““ON/RNK1/OAT1(!0),DAT2{10),HVAL(10,20), 

♦  NBK 1 ( 1 0) ,NPK2( 1 0) ,SVAL ( 1 0,20) , 

C0MH0S/EC01 /CSAL ( 1 0) , IFXD( 10) ,ITCP( 10) ,TXRT ( 1 0)  , 

♦  ►CRn(lO),ACST(lO,20),ANCF(l0,20),BNCF(10,20), 

♦  VCST(10,20),FCST(10,?0),CMMP(10,20),AZEP(10), 

♦  RAXF(10,2O),RCST(t0,?0),RVAL(10,2O),WCRA(in,?l), 

♦  wCRT ( 1 0,21 ) , T I TL ( 20, 1 0)  , 

COH“ON/PHY1 /ABTIK1 0) , AFSU( 10) , AFHR ( 10) , ASSI ( 1 0)  , 

♦  PCTA(10),PCTR(10),RRTU(10),OCOO{10),RDSI(10), 

♦  RESl  (10),RFS2(10),RHSI ( 10),RSSI (10) , SBT 1 1  ( ] 0) 

DIMENSION  BC AT ( 1 0) ,BC AE ( 10  1 

CALCULATE,  FOR  EACH  ALTERNATIVE,  the  PENEFIT 
(PATIO  (IF  PRESENT  VAI.UE  of  OUTPUT  to  present 
DIMENSION  PVST (10) 

DO  2  J*1  ,f  A i.  T 
0  A  T 1 (J)=0.0 
OAT2(J)sO.O 
NY=NYRS(J) 


COST  RATIO 
VALUE  OF  COST ) 


RNK  000 1  0 
RNK  00020 
RNK00030 
RNK  OOOUO 
RNK  00050 
RNK  00060 
RNK  00070 
RNK  00OBP 
RNK  00090 
RNK  00 1 0 o 
BNK001 1 0 
RNK  00 1 20 
RNK  00 1 30 
RNK  0  0 1 31 
PNKOOl  32 
PNK001 33 
RNK  00139 
RNK  00 1  35 
BNK001 30 
RNK001 32 
RNK  00133 
RNK  00 1 50 
RNK 001 70 
RNk  00 1 50 
RNK  00 1 90 
BNKO0200 
RNK  0  02 1 0 
RNk  00220 
RNK  00250 


IQ.  C  *** 

51.  C  *** 

32. 

33. 

за. 

35. 

зб.  1 

37.  C  *** 

35.  C  *** 

39.  C  *** 

«0. 

ai. 

a2. 

«3.  2 

ua . 

«5.  C  *** 

«6. 

a7. 

as.  C  *** 

09. 

5n.  3 

51. 

52. 

53. 

5a. 

55. 

56. 

57. 

55. 

59. 

60.  o 

61.  20 

62.  C 

63 .  C  *** 
60. 

65.  10 

66. 

67. 

65. 

69. 

70. 

71. 

72.  5 

73.  6 
70. 

75.  7 

76. 

77. 

75. 

79. 

50  . 

81.  5 

82. 

83. 

80. 

85. 

86.  9 

87. 

85.  11 

89. 

90. 

91.  13 

92. 

Subroutine  RUP 


C  *L  CUL  *  TF  PRESENT  VALUE  OF  ENERGY  OUTPUT 

for  essential  ano  total  heat  reouirfments. 

no  1  Nsl,NY 

OAT1(J)s0AT1(J)+(HVAI(J,N)*EHTU(J))/((1.0y0ISR(J))**N1 


pnk  oo?6 o 

RNK0O?7O 
R  NK  (10250 
P^  KOO?QO 


0AT2f  J)*DAT2(  J)*(HVAL  (  J,M>*F«TU(  Jt+SVAL  (  J  ,  M  )  *S«T  II  C  J  )  )  /  (  (  1  .  0  ♦  (!  1  S«  (  JBNK  (1  d  3(1  0 


♦))*«N) 

CONTINUE 

CALCULATE 


PEMEFIT  COST  WATJO  (RATIO  OF  RRF  SENT  VALUE  OF  ENERGY 


OUTPUTS  TO  PRESENT  VALUE  OR  COSTS  OF  MEAT  ENERGY  RE  '111  1  Rfc  HE  NTS ) 


PCAE(J)*-DATl(J)/PVAT(.n 

8CAT(J)S-0AT?(J)/PVAT(J) 

RVST(J)  *  (IVST(J)  ♦  IFxP(J)  ♦  mCKO(J)) 
CONTINUE 

IF (N0P1 .EQ.l)  GO  TO  13 
RANKING  OF  ALTERNATIVES  8  Y  HIGHEST 
CALL  RAN(HCAF,NPK1 .NALTl 
call  RAN(HCAT,NRK?,n*LT) 

PRINT  OUT  USER  SPECIFIFO 
WRITE (6,31 

FORMAT!  •  1  •  'PART  II. 

♦  ///OX,  ‘FIRST  YEAR  HfAT  F  N  E  R  G  Y  VALUES 
♦En* /ox, 'PRESENT  value  of  heat  energy 


RNKOdSOI 
RNK0031 0 
PNK0035P 
PHK  0  0  390 
PNKOOUOO 
PNK  (1  0  0  1  0 
RNK00020 
RNKO0O21 
PNK  00050 
RNKOOObO 
PNK  00070 
RNKOOSOO 
PNK  00520 
RNK  00530 
RNKOOSOO 
ALTERNATIVES 'RNK 00 550 
(USF  R  SPFCIFIE01  AND  DISCOUNTRNK00S51 
FOR  EACH  ALTERNATIVE!'//  PFKOOSS? 


CSAL (J) 


PENFFIT  COST  PATIO  OF  HE  A T 


HEAT  ENERGY  value (J/mmbtu) 


HENFFIT  COST  Ratios  FOP  all 


♦  9x  ,  '  HE  A  T  ENERGY  VALUE  (  t /MHBTii  )',  3X  ,' PRESENT  VALUF  OF  HEAT  ENF  RGY  •  PNK  (1 0553 

♦  ,3x  ,  '  OT  SCOUNT '/10X,'ESSENTIAL',9X,  'SURPLUS '  ,0X,  •  (RASEO  on  •  , 1  OX,  RNKOOSSa 

♦  '  (INCLUDING' ,5X, 'PATF • /l lx, 'ENERGY  •  , 1 IX, • ENERGY  » ,5X, 'ESSE  NT  I AL ) ' ,  Rnk 00555 

♦  10X,  'SURPLUS)  '  , 0 X , • ( PC T .  )  •  / 1  RNK 00556 

00  20  Js 1 , N AL T  RNK00553 

Hrl  PNKO055O 

WRITE (6,0)  J , H  v  A  L (  J  ,  M  ) , S  V  A  L (J,H),0ATI(J),0AT2(J),PCT(J)  PNK 00555 

FORHAT(OX.'ALT',1X,I2,2X,F6.2,10X,F6.2,OX,F10.0,9X,F10.0,OX,F5.1)  RNK00556 

CONTINUE  P"k  00557 

PRINT  OUT  BENEFIT  COST  RATIO  IN  RANKED  OROFR  OF  HIGHFST  TO  LOWEST  PNK005b0 

VALUE  FOR  EACH  ALTERNATIVE.  RNK00S65 

WRITE (6, 10)  PNK  00570 

FOPmaT(///OX, 'RANKING  OF  ALTERNATIVES  Hy  HIGHEST  BENEFIT  COST  p  A  T I PNK  0  0550 

♦  O' /OX,  ' (PATIO  OF  P.v.  OF  HEAT  FNFRGY  OUTPUT  TP  P.V.  OF  AFTER  T A  X ' /PNK 0 059(1 

♦  OX, 'NET  CASH  FLOW)  PASEO  ON  ESSENTIAL  HEAT  ENERGY  RfOll  I  PE**t  NTS  1  ' //RNK  00600 

♦  21X,  '6/C  RATIO', 1SX, 'REQUIRED  NET  INVESTMENT'/)  PNK00601 


00  5  J»1,NALT 
K  s  MRK1(J) 

WRITE (6,6)  NRK1(J),RCAE(K),RVST(K) 

CONTINUE 

FORMAT (1  OX, 'ALT' , 1 X , 1 2 , ? X , F I  0 . 2 , 2 0 X , F 1 0 . 1 ) 
WRITF(6,7) 

FQPHATf '0'//«X, 'RANKING  OF  ALTERNATIVES  BY 
♦TIO* /OX, 'PASFP  ON  TOTAL  HFAT  ENERGY  OUTRUT 


RNK  00620 
PNK00620 
RNK  0  060  0 
RNK  00650 
PNK00660 
PNK  00670 

HIGHEST  BENEFIT  COST  PARNK006RO 

(Including  surplus) r • //pnkoo69o 


♦  21x,'b/C  patio' , 15X, 'required  nf t  Investment'/)  rnkoo69\ 

0O  5  J*1,NALT  RNK00720 

K  s  NPK?(J)  PNK00730 

WRITE (6,6)  NRK?(J) ,PC‘T (K ) ,RVST (K1  RNK00750 

CONTINUE  RNK00760 

NB  r  0  RNK00780 

00  9  J* 1 , NAL  T  RNK  00500 

0 1 F 2  *  E8TU(1)  -  EPTU(J)  PNK00P3O 

IF (0IF2.GT .0.0001 . OP. niF2.LT. -0.0001)  NB  s  1  RNKOOBuO 

CONTINUE  PNK00F70 

IF(NH.EQ.l)  wRITF.  (6,11)  Rnk 00590 

FORMAT (' 0 • /OX, ' THE  RANKINGS  by  BENEFIT  COST  RATIO  APE  NOT  VALID  CRRNK009OP 

♦  I TE° I  A  FOR ' /OX, 'COMPAR ISON  BECAUSE  THE  USER  haS  SRECIFIEP  01 FFE RF NR!  k o 0950 

♦  T  ESSENTI AL ' /ox,  'HF AT  PEOUlREMENTS  AMONG  THE  ALTERNATIVES'//)  RNK  00960 

CONTINUE  RNKP1000 

EnO  RNK01010 


PUR 


1. 

2. 

3. 

а. 

5. 

б. 


This  IS  the  maim  SUBROUTINE  for  the  compare  program.  the  compare  PUR 00 0 1 0 
PROGRAM  PROVIDES  COMRaRISON  OF  FCONPMIC  ALTERNATIVES  In  SYSTEMS  RUR00020 
FOR  PROVIOING  PROCESS  HEAT  ENERGY,  IN  TmF  CONTEXT  OF  A  FOREST  PUR00030 
RRODUCTS  MANUFACTURING  FACILITY  WITH  AVAILABLE  wOOO  OR  PARK  RlJPOOOOO 

RESIDUE  FUEL.  T HF  program  PROVIDES  *  Ranking  OF  ALTfRNAlIvFS  RUP00050 
ACCORDING  TO  THE  LOwFST  DISCOUNTED  BENEFIT  COST  RATIO.  RUP00060 
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REAL  IVST,  ITCP, IExP, Inrt 
DIMENSION  NCAF(10),INPT(10) 

COMMON/ ALL /AFMC( 10) , ANMV( 10) , ARRU(IO) , AXFT (1  0)  , 

♦  BTUR(10),DISB(10),E8TU(10),FATS(l0), 

♦  HHVU  (10),HPAF(10),MRPF(10),IVST(10),n.PS(10),RVAT(10),PCT(10), 

♦  RAVL  UO)  ,PEC*  (  10),TAtJX  (  101  ,TPFS(  10)  ,DEPP(10,20)  , 

♦  NAl T ,N0P1 , NVPD( t 0 1 
COMMON/RFOl  /  AF(JA(  10  )  ,CHOF  (10), 

C0MM0N/HTR1 /AC ML (  1  0),  AE  AF  (10)  ,  ASGT  (  10)  ,  ATCA  MO), 

♦  ATPF(in),*VCC(10),AVMC(10),AVNC(10),AV0C(10), 

♦  CONV(10),SGHD(10),SGH*(10), 

COMMON /OF  PI /8 ( 2  1  ) ,0( 1 0) ,NOEP (10), 
COMMON/FC01/CSAL(10),IEXP(10),ITCP(10), 

♦  TXRT(IO)  ,wCPQ( 10) , ACST ( 10,20), ANCF ( 10,20) ,BnCF ( 10,20)  , 

♦  VCST(10,20) ,FCST( 10,20 ),CMMfi( 10,20 ),A7EP( 10), 

♦  PAXF()0,20),RCST(10,20),RVAL(10,20),WCPA(10,21), 

♦  WCRT(10,21),TITL(20,10), 

COMMON/PMVl /AHTIKl 0) , AFSIK10) , AFWR( 10) , ASSI ( 10) , 

♦  PCTA(IO)  ,RCTR  (  ini.RBTlKI  0),RCnr>(  1  0)  ,POSI  (  10)  , 

♦  RFS1  (10),RFS2(10),RWST (10) ,RSSI(10),SRTU(lO), 

C0«M0N/PNK1 /OAT  1 (10),OAT?(10),HVAL(10,20), 

♦  NBK1  (10), NR«?(10) ,SVAl  (10,20) 

C 

c  ***  READ  STATEMENTS 

c 

REAP  (5,1)  NALT 
00  11  J*1,NALT 

REAP  (5,2)  (TITL(I#J)#I=l#2ft) 

11  CONTINUE 

DO  22  J=1,NALT 

PE  A  p  (5,3)  AFMC  (J)  , AWfil)(J) ,RFS1  (J),RF$2(J),AVHC(J),AV0C(J). 
♦AVCC(J),AVNC(J),AHWV(J),NCAF(.J),AXFT(J),AFSU(J),MHVU(J),CHPE(J), 
22  Continue 

On  JsI.nalt 

AFHA(J)  z  l.o 

PFAP  (5 ,  « )  EHTU(J),SRTU(J),RAVL(J),ASGT(J),ATRF(J),ATCA(.D, 
♦AEAF(J),ACHL( 1),AFBA(J) 

35  CONTINUE 

00  !ia  JsI.nalt 

HTIJH(  J)zEMTIJ(J  )  ♦  SRTII(J) 

REAP  (5,5)  IVST(J),*CRQ(J),IFXP(J),CSAL(J),FATS(J),OISP(J), 

♦  TxRT  (J) ,NOEP(J) ,NYRS (J) ,NYRO( J) , ITCP ( J) , I N R T ( J ) 

CONTINUE 

C»LL  P01  (VCST.NYRS.NALT) 

CALL  P01  (FCST.NVPS.NALTl 
CALL  P01  (HV»L ,NVR$,NAl  T ) 

CALL  BD 1  (SVAL .nyps.nalt ) 

CALL  PD  1  (PAXF ,NVRS,NAL T ) 

CALL  P01  (PVAL,NY»S,NA|  T ) 

1  FORMAT (12) 

2  FOPMAT(20A«) 

3  FOPMAT(FS,Fb,2Au,0(F5),Ffe,Tl,2AU,F5,FU) 
a  F0RMAT(UFtn,3FS,2Fu) 

5  FQRMAT  (5F  10, 2F  <1,11, 212, FR,F<>) 

6  FOONAT(IOFP) 

DO  7  jsi.nalt 
IF(NDEP(J).NF.O)  GU  to  7 
PfcAO  (5,61  (DFPP(J,H),NS1,10) 

IF (NYRS ( J) .LE . 1 0)  GO  TO  7 

NY  s  NYRS(J) 

READ  (5,61  (DEPP(J.N) , N  = 1 1  ,NY) 

7  CONTINUE 
C 

C  *♦«  INITIALIZATION  OF  STORAGE  ARRAYS 

C 

NOP  1  s  0 
N0P2  s  0 

no  9  jsi.nalt 

WC  P  T ( J  ,  1  )  s  WCRN(J)  *  (l.o  ♦  I NR  T ( J ) 1 
WCRA(J,1)  =  WCRT(J,1)  -  RC»1(J) 

NY  s  NYPS(J) 

DO  H  NS  1  , NY 


RUR00070 
RIJP00090 
PUP001 00 
RUPOO 1 1 0 
RUP  00 1 20 
RllPOOl  30 
RUP001 UO 
RUP00150 
RUPOO 1 60 
RUPOO  170 
RIJRP01  80 
RUP00190 
RUPP0200 
RllP  0  02 1  0 
RUP00220 
RIJP00230 
RUPO02UO 
RUP002SO 
PUP00260 
RUP00270 
RUP002BO 
RUP00290 
RUPOOJOO 
PUR00310 
RllR  0  0320 
PUP0033O 
RUP0O3U0 
PUP00350 
RUP00360 
RUP00370 
RllP  0  0  38  0 
RUPnO  390 
RUPOOUOO 
RtiPOOa  l  o 
PUPOOU20 
RUROOU30 
Pupooauo 
PUP00U50 
PUROOUbO 
RUP00U70 
Rupooaen 
RUP00U90 
Ri  IP  0  050  0 
RllP  005  1  0 
RUPO0520 
RIIR00530 
RllROOSaO 
RUR00550 
PIIPO056O 
RUR00570 
RIJR005B0 
RUP0059O 
RliROObOO 
R  Li  P  0  0  6  1  0 
RUP00620 
RUPO063O 
RiiP006an 
PlipnOhSO 
RljPOObbO 
Rup  0  0  ►>  70 
PHPflflbSO 
R 1 1 R  0 1)  6  9  0 
PIIR00700 
RUR007  1  0 
RUP0072U 
PUR0O730 
PUP007  uO 
PUP  n  0  750 
RllP  0  0  7  6  0 
RUPOO 770 

RllP  it  0  7  A  0 

R  l !  P  0  0  7  9  0 
RI  IP  00  M  00 


80. 

NN  a  N  ♦  1 

RUP0081 0 

81  . 

C 

*  *  * 

C ALCUL ATE  YEAPIY  AnniTtOMAL 

FORKING  CAPITAL 

RE  00  I  WE  ME  NTS  PER  YEAH  RIIP00820 

82. 

WCRT(J.NN)  s  wrPT(J.N)  *  (1 

.0  ♦  INPT(J)) 

RUP006  30 

85. 

■«CRA(J,NN)  x  wCRT(J,nni  -  WCRTU.N) 

RlJPOORUO 

8'J. 

ANCF(J.M)  S  0.0 

RUP00850 

es. 

8 

continue 

RUP00860 

8b. 

9 

CONTINUE 

RUP00870 

87. 

no  10  Jsl.NAlT 

H1IP00880 

8«. 

IFCAVHCIJl.LE .0.0)  AVHC(J) 

s  0.06 

PIJP00890 

80. 

IF  (AVOC (J)  .LE.O.O)  AVOC(J) 

s  0.81 

RUP00900 

90. 

IF(AVCC(J).LE .0.0)  AVCC(J) 

i  0.60 

RIIP0091  0 

91. 

IF(AVNC(J).LE .0.0)  AVNC(J) 

s  0.01 

RUP00920 

92. 

IF(AHPv(J). LE.O.O)  ahhv(J) 

x  8500.0 

RIIP00950 

95. 

IF(NCAFIJ).EO.O)  AXFT(J)  x 

•  nn  • 

RUP009UO 

9«. 

IF  (NCAF (J) .EO.O)  AFSU(J)  * 

'«8L.' 

RUP00950 

95. 

IF(NCAF(J).EO.O)  HHVil(J)  = 

6.3 

PUPOORbO 

96. 

IF (NCAF (J).EQ.O)  CHRF(J)  * 

0.8 

RIJP0OR70 

97. 

IF(NCAF(J). F.0.1)  AXFT(J)  * 

* COA|  ' 

RUP00980 

9». 

IF(NCAF(J).F0.1  )  AFSIJ(J)  * 

•  TON' 

PUP0099O 

99. 

IF(NC*F(J).EQ.l)  HHVIKJ)  3 

28.0 

RIIP01  000 

100. 

IF(NCAF(J).E0.1 )  CHPF (J)  S 

0.67 

RUP01 01 0 

101  . 

IFfNCAF  (J)  .E  0 . 2 )  AXFT(J)  x 

•  gas' 

RUP01 020 

102. 

IF(NCAF(J).E0.2)  AFSU(.l)  * 

'  MCF  ' 

PUP01030 

105. 

IF (NCAF ( J) .EQ.2)  HHVH(J)  * 

1  .0 

RUP01080 

108. 

IF (NCAF  (J).E0.2)  CHRE(J)  3 

0.76 

RUP01 050 

105. 

IF(ASGT(J). LE.O.O)  ASGT(J) 

x  500.0 

HUPO 1060 

106. 

IF(ATRF(J). LE.O.O)  ATRF(J) 

x  60.0 

RUPO 1070 

107. 

IF(ATCA(J). LE.O.O)  ATCA(J) 

x  60.0 

RUP01 080 

108. 

IF(AFAF(J).LE .0.0)  AEAF(J) 

x  0.90 

R'JPOIORO 

109. 

IF(ACHL(J). LE.O.O)  ACHL(J) 

X  0.08 

RUPO 1100 

1  10. 

10 

Continue 

RllPOl  1  1  0 

111. 

C 

RUPO 1 120 

1  12. 

C 

CALL  RUP  SUBROUTINES 

RUPO 1130 

113. 

C 

RUP01 180 

118. 

CALL  OEP 

RUP  0 1 150 

115. 

CALL  HTR 

RUP01 160 

116. 

CALL  RED 

RUP01 170 

117. 

CALL  ECO 

RUP01 180 

118. 

CALL  RNK 

RUP01 190 

119. 

CALL  PHY 

RllPO  1  200 

120. 

RUPO 1210 

121. 

STOP 

RllPOl  220 

122. 

END 

RUPO! 230 
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A  method  is  presented  that  was  developed  to  analyze  investments 
in  industrial  wood  and  bark  energy  systems.  The  method  is  embedded 
in  a  computer  program  called  COMPARE.  This  program  provides 
complete  guidelines  for  economic  analysis  of  wood  and  bark  energy 
systems. 
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COMPARE: 

A  Method  for 
Analyzing  Investment 
Alternatives  in 
Industrial  Wood  and 
Bark  Energy  Systems 


In  figure  1,  page  8,  of  this  publication,  the  entry  written  in 
columns  2  through  9  of  lines  8,  9,  and  10  of  the  data  input 
should  be 


252230. 


and  not 


25230. 


as  written. 

The  corrected  entries  will  produce  the  output  as  shown  in  figure  3 
of  this  publication.  The  uncorrected  entries  will  produce  output 
with  different  output  values  than  those  shown  in  figure  3. 
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